Details

analyze6.7s (4.4%)

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.6%	0.6%	99.2%	0.2%	0%	0%	0%	11
0.7%	0.7%	99.1%	0.2%	0%	0%	0%	12

Compiler

Compiled 175 to 127 computations (27.4% saved)

sample51.1s (34.1%)

Results

19.8s	1742×	body	4096	valid
9.7s	1384×	body	2048	valid
9.6s	1690×	body	1024	valid
6.5s	92×	body	8192	exit
3.4s	2712×	body	256	valid
2.0s	728×	body	512	valid

Bogosity

preprocess100.0ms (0.1%)

Algorithm

2×	egg-herbie

Rules

1932×	`times-frac`
1660×	`associate-/l*`
886×	`associate-*r/`
854×	`associate-*l/`
372×	`associate-/l/`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	328	5995
1	885	5819
2	2862	5819
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 180 (/.f64 (atan.f64 (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.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) (/.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)) (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 (.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))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.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) (/.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)) (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 (.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))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.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) (/.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)) (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 (.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))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.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) (/.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)) (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 (.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))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.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) (/.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)) (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 (.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))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.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) (/.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)) (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 (.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))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.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) (/.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)) (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 (.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))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.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) (/.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)) (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 (.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))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.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) (/.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)) (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 (.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))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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))) (PI.f64)))

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

Compiler

Compiled 179 to 131 computations (26.8% saved)

simplify75.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

1552×	`associate-/r/`
1144×	`associate-/l*`
958×	`times-frac`
822×	`*-commutative`
646×	`distribute-rgt-out--`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	49	545
1	118	529
2	348	529
3	1503	529
4	6321	529

Stop Event

1×	node limit

Counts

1 → 5

Calls

Call 1

Inputs

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

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

eval12.0ms (0%)

Compiler: Compiled 835 to 539 computations (35.4% saved)

prune12.0ms (0%)

Pruning

5 alts after pruning (5 fresh and 0 done)

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

Accurracy

15.4%

Counts

6 → 4

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	13.2%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale))))) (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))))))))
▶	11.1%	(.f64 (atan.f64 (.f64 y-scale (/.f64 (-.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 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 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 (.f64 (/.f64 (-.f64 b a) (/.f64 y-scale (+.f64 a b))) 2) (/.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) x-scale))))) (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))))))) (/.f64 180 (PI.f64)))
▶	12.8%	(.f64 180 (/.f64 (atan.f64 (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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))) (PI.f64)))
▶	13.2%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 (-.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 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) b) 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 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) b) 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 2 (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))))) (.f64 y-scale x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))))))) (.f64 y-scale x-scale))) (PI.f64)))

Compiler

Compiled 681 to 464 computations (31.9% saved)

localize494.0ms (0.3%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	72.3%	(/.f64 (-.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 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) b) 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 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) b) 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 2 (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))))) (.f64 y-scale x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (*.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))))))
✓	61.9%	(sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))
✓	61.5%	(cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))
✓	55.1%	(-.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 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) b) 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 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) b) 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 2 (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))))) (.f64 y-scale x-scale)))))

Compiler

Compiled 1463 to 888 computations (39.3% saved)

series295.0ms (0.2%)

Counts

4 → 144

Calls

36 calls:

Time	Variable		Point	Expression
50.0ms	y-scale	@	0	(/.f64 (-.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 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) b) 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 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) b) 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 2 (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))))) (.f64 y-scale x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (*.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))))))
25.0ms	angle	@	-inf	(/.f64 (-.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 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) b) 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 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) b) 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 2 (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))))) (.f64 y-scale x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (*.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))))))
14.0ms	b	@	inf	(-.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 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) b) 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 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) b) 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 2 (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))))) (.f64 y-scale x-scale)))))
14.0ms	x-scale	@	0	(/.f64 (-.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 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) b) 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 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) b) 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 2 (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))))) (.f64 y-scale x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (*.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))))))
13.0ms	angle	@	0	(-.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 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) b) 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 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) b) 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 2 (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))))) (.f64 y-scale x-scale)))))

rewrite160.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

1046×	`add-sqr-sqrt`
1034×	`*-un-lft-identity`
1024×	`pow1`
964×	`add-exp-log`
964×	`add-log-exp`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	43	958
1	1004	958

Stop Event

1×	node limit

Counts

4 → 41

Calls

Call 1

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

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

simplify1.8s (1.2%)

Algorithm

1×	egg-herbie

Rules

1276×	`+-commutative`
1066×	`associate-*r/`
920×	`*-commutative`
894×	`associate-*l/`
622×	`associate-+r+`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	1221	235181
1	4765	235177

Stop Event

1×	node limit

Counts

185 → 286

Calls

Call 1

Inputs
(-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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) (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 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (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 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (.f64 (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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (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 (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))) 2)) (.f64 (pow.f64 a 6) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-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 x-scale 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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) (+.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (.f64 (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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 -1/2 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.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 a 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(-.f64 (+.f64 (.f64 -1/2 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.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 a 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (+.f64 (/.f64 (.f64 (pow.f64 b 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 1/4 (.f64 (/.f64 (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.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 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 -1/2 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.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 a 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(-.f64 (+.f64 (.f64 -1/2 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.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 a 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (+.f64 (/.f64 (.f64 (pow.f64 b 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 1/4 (.f64 (/.f64 (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.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 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))
(-.f64 (+.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 (pow.f64 angle 2) (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))))) (*.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))
(-.f64 (+.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 angle 2) (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 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/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 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))) (PI.f64))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 angle 4)))) (*.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))
(-.f64 (+.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 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (/.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 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 1/45 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))) (PI.f64))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 1/45 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (PI.f64) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (.f64 1/2 (/.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (.f64 2/45 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))) (PI.f64))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-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 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 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)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (/.f64 (.f64 (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))))) (pow.f64 angle 6)) (+.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 angle 2) (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 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/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 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))) (PI.f64))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 angle 4))))) (*.f64 2 (/.f64 (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 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))
(-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))
(-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (+.f64 (/.f64 (.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (pow.f64 b 4)))))) (+.f64 (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (+.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 (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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (pow.f64 b 4))))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))
(.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))
(-.f64 (+.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.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 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (pow.f64 b 2)))))) (+.f64 (/.f64 (.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 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 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.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 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (pow.f64 b 2))))))) (+.f64 (/.f64 (.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 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))
(-.f64 (+.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.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 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (pow.f64 b 2)))))) (+.f64 (/.f64 (.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 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 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.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 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (pow.f64 b 2))))))) (+.f64 (/.f64 (.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 -1 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(+.f64 (.f64 -1 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (.f64 -1/2 (/.f64 (.f64 (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 (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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/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 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (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 (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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 1/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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 y-scale 4) (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/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) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 6) (+.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 1/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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 y-scale 4) (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/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) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(-.f64 (+.f64 (.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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)))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(-.f64 (+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 4) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(-.f64 (+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 4) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale 6) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2))))))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(-.f64 (+.f64 (.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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)))) (.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 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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))))) (.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 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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 1/4 (/.f64 (.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 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 (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 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))
(.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 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 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))))) (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (pow.f64 x-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 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))))) (+.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 x-scale 4) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)))) (.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (pow.f64 x-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 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 x-scale 2)))
(+.f64 (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 x-scale 2))) (.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 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (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 1/4 (/.f64 (.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3))))))
(+.f64 (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (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 1/2 (/.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 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 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 (cos.f64 (.f64 1/180 (.f64 angle (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))) 4))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 8) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 x-scale 2)))
(+.f64 (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 x-scale 2))) (.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 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (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 1/4 (/.f64 (.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3))))))
(+.f64 (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (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 1/2 (/.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 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 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 (cos.f64 (.f64 1/180 (.f64 angle (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))) 4))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 8) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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)))))))
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 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 a 4) (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1 (/.f64 (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 4) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-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 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 b 2)))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 a 6) (-.f64 (.f64 1/4 (.f64 (/.f64 (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))) 2)) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-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 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) (.f64 -1 (/.f64 (-.f64 (.f64 -1/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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (.f64 -1 (/.f64 (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 b 2)))) (pow.f64 b 2)))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 a 4) (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1 (/.f64 (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 4) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-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 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 b 2)))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 1/2 (/.f64 (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (.f64 1/2 (/.f64 (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 -1 (.f64 (pow.f64 b 2) (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 a 4))) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (.f64 1/2 (/.f64 (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 -1/4 (.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 (-.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)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1 (.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2)))) (pow.f64 b 2)))) (pow.f64 a 6))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 -1 (.f64 (pow.f64 b 2) (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 a 4))) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 1/2 (/.f64 (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (.f64 1/2 (/.f64 (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 -1 (.f64 (pow.f64 b 2) (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 a 4))) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (.f64 1/2 (/.f64 (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 -1/4 (.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 (-.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)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1 (.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2)))) (pow.f64 b 2)))) (pow.f64 a 6))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 -1 (.f64 (pow.f64 b 2) (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 a 4))) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(.f64 90 (/.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))
(+.f64 (.f64 90 (/.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 1/2 (.f64 angle (-.f64 (.f64 180 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))))))
(+.f64 (.f64 90 (/.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.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/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 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))) (PI.f64))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 32400 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))) (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64))))))) (.f64 1/2 (.f64 angle (-.f64 (.f64 180 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))))))
(+.f64 (.f64 90 (/.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.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/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 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))) (PI.f64))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 32400 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))) (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (/.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 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (/.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 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 1/45 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))) (PI.f64))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 1/45 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (PI.f64) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (.f64 1/2 (/.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (.f64 2/45 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))) (PI.f64))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-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 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 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)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (PI.f64))) (+.f64 (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.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/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 (.f64 2/45 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))) (PI.f64))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 32400 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))) (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64))) (.f64 32400 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 -1/881596846080000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 -1/1469328076800000000 (pow.f64 (PI.f64) 7)) (.f64 -1/30855889612800000000 (pow.f64 (PI.f64) 7)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))))))) (.f64 1/2 (.f64 angle (-.f64 (.f64 180 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 -1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (.f64 (-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 1 (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))) (pow.f64 b 2))))
(+.f64 (.f64 1/2 (.f64 (-.f64 (.f64 1/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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 1 (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)))) (pow.f64 b 4))) (+.f64 (.f64 -1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (.f64 (-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 1 (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))) (pow.f64 b 2)))))
(+.f64 (.f64 1/2 (.f64 (-.f64 (.f64 1/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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 1 (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)))) (pow.f64 b 4))) (+.f64 (.f64 -1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (.f64 (-.f64 (.f64 -1/4 (.f64 (/.f64 (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2)) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (.f64 1/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 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (.f64 -1 (/.f64 (-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 1 (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)))) (pow.f64 a 2)))) (pow.f64 b 6))) (.f64 1/2 (.f64 (-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 1 (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))) (pow.f64 b 2))))))
(.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))) (pow.f64 b 4)))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/4 (.f64 (/.f64 (.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (pow.f64 a 2) (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))))) (pow.f64 b 6))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))) (pow.f64 b 4))))))
(.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))) (pow.f64 b 4)))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/4 (.f64 (/.f64 (.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (pow.f64 a 2) (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))))) (pow.f64 b 6))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))) (pow.f64 b 4))))))
(.f64 -1/2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1/4 (/.f64 (.f64 (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 (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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 (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 (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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 1/8 (/.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 y-scale 4) (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/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) (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 (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 (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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (+.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 1/8 (/.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 y-scale 4) (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/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) (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))))
(.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))) (pow.f64 y-scale 2))))
(+.f64 (.f64 -1/4 (/.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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 4) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 y-scale 2)))))
(+.f64 (.f64 -1/4 (/.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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 4) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 y-scale 2))) (.f64 1/8 (/.f64 (.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale 6) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))))
(.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))) (pow.f64 y-scale 2))))
(+.f64 (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 y-scale 2)))))
(+.f64 (.f64 1/8 (/.f64 (.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (+.f64 (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 y-scale 2))))))
(.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (.f64 1/2 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (cos.f64 (.f64 1/180 (.f64 angle (PI.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 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(+.f64 (.f64 1/2 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (cos.f64 (.f64 1/180 (.f64 angle (PI.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 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(+.f64 (.f64 1/8 (/.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 x-scale 4) (-.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (+.f64 (.f64 1/2 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (cos.f64 (.f64 1/180 (.f64 angle (PI.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 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))))
(.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1/4 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(+.f64 (.f64 1/8 (/.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) (.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))) 3) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1/4 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))
(+.f64 (.f64 1/8 (/.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) (.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))) 3) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 1/4 (/.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 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 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 (cos.f64 (.f64 1/180 (.f64 angle (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))) 4))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 8) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -1/4 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))))
(.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1/4 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(+.f64 (.f64 1/8 (/.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) (.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))) 3) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1/4 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))
(+.f64 (.f64 1/8 (/.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) (.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))) 3) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 1/4 (/.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 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 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 (cos.f64 (.f64 1/180 (.f64 angle (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))) 4))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 8) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -1/4 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.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 y-scale y-scale)) (neg.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))))
(.f64 1 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))))
(.f64 (sqrt.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))))) (sqrt.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))))))
(.f64 (.f64 (cbrt.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))))) (cbrt.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))))) (cbrt.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))))))
(/.f64 (-.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 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 y-scale y-scale))) (.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) 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)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) 3) (pow.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))) 3)) (+.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 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 y-scale y-scale))) (+.f64 (.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) 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)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))))))
(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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) 1)
(log.f64 (exp.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))))))
(cbrt.f64 (.f64 (.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) 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)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) 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)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))))))
(expm1.f64 (log1p.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))))))
(exp.f64 (log.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))))))
(log1p.f64 (expm1.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))))))
(.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))))) (/.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))))))
(.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (/.f64 1 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))))))
(.f64 1 (/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))))))
(.f64 (sqrt.f64 (/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))))))) (sqrt.f64 (/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))))))))
(.f64 (.f64 (cbrt.f64 (/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))))))) (cbrt.f64 (/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))))))) (cbrt.f64 (/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))))))))
(pow.f64 (/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))))) 1)
(log.f64 (exp.f64 (/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))))))))
(cbrt.f64 (.f64 (.f64 (/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))))) (/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))))))) (/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))))))))
(expm1.f64 (log1p.f64 (/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))))))))
(exp.f64 (log.f64 (/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))))))))
(log1p.f64 (expm1.f64 (/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))))))))

Outputs
(-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (.f64 (.f64 a a) (-.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))) (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (.f64 (.f64 a a) (-.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))) (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))))
(-.f64 (+.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (.f64 (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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (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 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (pow.f64 a 4)) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 a a) (-.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))) (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))))
(-.f64 (fma.f64 -1/2 (.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (pow.f64 a 4)) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 a a) (-.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))) (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)))))))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))))
(-.f64 (+.f64 (.f64 1/4 (.f64 (/.f64 (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))) 2)) (.f64 (pow.f64 a 6) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-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 x-scale 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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) (+.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (.f64 (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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (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 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2)) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (pow.f64 a 6))))) (fma.f64 -1/2 (.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (pow.f64 a 4)) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 a a) (-.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))) (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))))))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))
(-.f64 (fma.f64 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)))))) 2)) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale))))) (pow.f64 a 6))))) (fma.f64 -1/2 (.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (pow.f64 a 4)) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 a a) (-.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))) (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale))))))))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))
(.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(.f64 (.f64 a a) (-.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))))
(+.f64 (.f64 (.f64 a a) (-.f64 (-.f64 (/.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))))
(-.f64 (+.f64 (.f64 -1/2 (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.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 a 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(-.f64 (fma.f64 -1/2 (/.f64 (.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))))
(-.f64 (fma.f64 -1/2 (/.f64 (.f64 (+.f64 (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 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 (/.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))))
(-.f64 (+.f64 (.f64 -1/2 (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.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 a 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (+.f64 (/.f64 (.f64 (pow.f64 b 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 1/4 (.f64 (/.f64 (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.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 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(-.f64 (fma.f64 -1/2 (/.f64 (.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 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))) (fma.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a 4)) (/.f64 (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))
(-.f64 (fma.f64 -1/2 (/.f64 (.f64 (+.f64 (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 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))) (fma.f64 (.f64 a a) (-.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 1/4 (/.f64 (.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 (pow.f64 a 4) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))))))))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))
(.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(.f64 (.f64 a a) (-.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))))
(+.f64 (.f64 (.f64 a a) (-.f64 (-.f64 (/.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))))
(-.f64 (+.f64 (.f64 -1/2 (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.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 a 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(-.f64 (fma.f64 -1/2 (/.f64 (.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))))
(-.f64 (fma.f64 -1/2 (/.f64 (.f64 (+.f64 (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 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 (/.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))))
(-.f64 (+.f64 (.f64 -1/2 (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.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 a 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (+.f64 (/.f64 (.f64 (pow.f64 b 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 1/4 (.f64 (/.f64 (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.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 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(-.f64 (fma.f64 -1/2 (/.f64 (.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 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))) (fma.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a 4)) (/.f64 (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))
(-.f64 (fma.f64 -1/2 (/.f64 (.f64 (+.f64 (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 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))) (fma.f64 (.f64 a a) (-.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 1/4 (/.f64 (.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 (pow.f64 a 4) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))))))))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))
(-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))
(.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (*.f64 x-scale x-scale))))
(-.f64 (+.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 (pow.f64 angle 2) (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))))) (*.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))
(+.f64 (fma.f64 2 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (-.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))))))) (.f64 -2 (/.f64 (.f64 b b) (.f64 x-scale x-scale))))
(+.f64 (.f64 (.f64 angle angle) (-.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale)))))) (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))
(-.f64 (+.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 angle 2) (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 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/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 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))) (PI.f64))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 angle 4)))) (*.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))
(+.f64 (fma.f64 2 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (fma.f64 (.f64 angle angle) (-.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))))) (.f64 (-.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/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 2/45 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 x-scale x-scale))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))) (pow.f64 angle 4)))) (.f64 -2 (/.f64 (.f64 b b) (*.f64 x-scale x-scale))))
(+.f64 (fma.f64 (.f64 angle angle) (-.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))))) (.f64 (-.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/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (fma.f64 2/45 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))) (pow.f64 angle 4))) (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
(-.f64 (+.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 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (/.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 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 1/45 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))) (PI.f64))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 1/45 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (PI.f64) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (.f64 1/2 (/.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (.f64 2/45 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))) (PI.f64))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-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 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 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)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (/.f64 (.f64 (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))))) (pow.f64 angle 6)) (+.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 angle 2) (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 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/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 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))) (PI.f64))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 angle 4))))) (*.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))
(+.f64 (fma.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)))) (fma.f64 1/2 (/.f64 (+.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) 2) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))))) (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a)))))) (.f64 1/45 (+.f64 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (PI.f64) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000))) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (PI.f64) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000))) (.f64 x-scale x-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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (fma.f64 2/45 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 a a) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))))) (pow.f64 angle 6) (fma.f64 2 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (fma.f64 (.f64 angle angle) (-.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))))) (.f64 (-.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/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 2/45 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 x-scale x-scale))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))) (pow.f64 angle 4))))) (.f64 -2 (/.f64 (.f64 b b) (*.f64 x-scale x-scale))))
(+.f64 (fma.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))) (fma.f64 1/2 (/.f64 (+.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) 2) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))))) (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a)))))) (.f64 1/45 (+.f64 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (PI.f64) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000))) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (PI.f64) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000))) (.f64 x-scale x-scale)))))))) (/.f64 (.f64 -1/2 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (fma.f64 2/45 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 a a) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))))) (pow.f64 angle 6) (fma.f64 2 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (fma.f64 (.f64 angle angle) (-.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))))) (.f64 (-.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/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (fma.f64 2/45 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))) (pow.f64 angle 4))))) (.f64 -2 (/.f64 (.f64 b b) (*.f64 x-scale x-scale))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 y-scale y-scale)))))) (/.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 (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (-.f64 (/.f64 (.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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 y-scale y-scale)))))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 y-scale y-scale)))))) (/.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 (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (-.f64 (/.f64 (.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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 y-scale y-scale)))))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 y-scale y-scale)))))) (/.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 (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (-.f64 (/.f64 (.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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 y-scale y-scale)))))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 y-scale y-scale)))))) (/.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 (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (-.f64 (/.f64 (.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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 y-scale y-scale)))))))))
(-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))
(-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))
(-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))
(-.f64 (fma.f64 (-.f64 (/.f64 (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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 b b) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))))
(-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (+.f64 (/.f64 (.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (pow.f64 b 4)))))) (+.f64 (/.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 (fma.f64 (-.f64 (/.f64 (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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 b b) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 -1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (.f64 (pow.f64 b 4) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2))))) (+.f64 (/.f64 (.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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))
(+.f64 (fma.f64 (-.f64 (/.f64 (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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 b b) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (.f64 (.f64 -1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (.f64 (pow.f64 b 4) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2)))) (+.f64 (/.f64 (.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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))))
(-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (+.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 (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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (pow.f64 b 4))))))) (+.f64 (/.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 (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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 b b) (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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2)) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))) (pow.f64 b 6))))) (+.f64 (/.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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (.f64 (pow.f64 b 4) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2))))))) (+.f64 (/.f64 (.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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))))
(.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 b b) (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))
(-.f64 (fma.f64 (.f64 b b) (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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))))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))))))
(-.f64 (-.f64 (fma.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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))))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(-.f64 (+.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.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 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (pow.f64 b 2)))))) (+.f64 (/.f64 (.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 (fma.f64 (.f64 b b) (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (/.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2))) (.f64 b b)))) (+.f64 (/.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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))))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))))))
(+.f64 (fma.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (.f64 (.f64 -1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2))) (.f64 b b))) (+.f64 (/.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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))))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))))))
(-.f64 (+.f64 (.f64 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 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.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 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (pow.f64 b 2))))))) (+.f64 (/.f64 (.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 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2))) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (pow.f64 b 4)))) (+.f64 (fma.f64 (.f64 b b) (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (/.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2))) (.f64 b b))))) (+.f64 (/.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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))))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))))))
(-.f64 (fma.f64 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2))) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (pow.f64 b 4)))) (+.f64 (fma.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2))) (.f64 b b))))) (+.f64 (/.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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))))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))))))
(.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 b b) (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))
(-.f64 (fma.f64 (.f64 b b) (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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))))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))))))
(-.f64 (-.f64 (fma.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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))))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(-.f64 (+.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.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 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (pow.f64 b 2)))))) (+.f64 (/.f64 (.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 (fma.f64 (.f64 b b) (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (/.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2))) (.f64 b b)))) (+.f64 (/.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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))))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))))))
(+.f64 (fma.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (.f64 (.f64 -1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2))) (.f64 b b))) (+.f64 (/.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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))))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))))))
(-.f64 (+.f64 (.f64 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 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.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 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (pow.f64 b 2))))))) (+.f64 (/.f64 (.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 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2))) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (pow.f64 b 4)))) (+.f64 (fma.f64 (.f64 b b) (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (/.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2))) (.f64 b b))))) (+.f64 (/.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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))))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))))))
(-.f64 (fma.f64 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2))) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (pow.f64 b 4)))) (+.f64 (fma.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2))) (.f64 b b))))) (+.f64 (/.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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))))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))))))
(.f64 -1 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(neg.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))))
(+.f64 (.f64 -1 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (.f64 -1/2 (/.f64 (.f64 (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 (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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/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))))))
(fma.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))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (/.f64 (.f64 -1/2 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) 2)))))
(+.f64 (.f64 -1 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (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 (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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 1/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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 y-scale 4) (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/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) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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)) (/.f64 (.f64 (pow.f64 y-scale 4) (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) 2)))) (/.f64 (.f64 1/4 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2)) (.f64 (pow.f64 y-scale 4) (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))))
(+.f64 (.f64 -1 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 6) (+.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 1/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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 y-scale 4) (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/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) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (fma.f64 1/2 (/.f64 (pow.f64 y-scale 6) (/.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 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (/.f64 (.f64 (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 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 -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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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)) (/.f64 (.f64 (pow.f64 y-scale 4) (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (fma.f64 1/2 (/.f64 (pow.f64 y-scale 6) (/.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 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (.f64 -1/4 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (/.f64 (.f64 (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 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 -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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) 2)))) (/.f64 (.f64 1/4 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2)) (.f64 (pow.f64 y-scale 4) (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))))
(.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(neg.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(-.f64 (+.f64 (.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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)))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))
(-.f64 (+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 4) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (fma.f64 -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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.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) (.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)))) (pow.f64 y-scale 4))) (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))
(-.f64 (+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 4) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale 6) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2))))))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (fma.f64 -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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.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) (.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)))) (pow.f64 y-scale 4))) (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (sin.f64 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (pow.f64 y-scale 6)) (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (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) (/.f64 (.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)))) 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))
(+.f64 (+.f64 (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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.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) (.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)))) (pow.f64 y-scale 4))) (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (sin.f64 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (pow.f64 y-scale 6)) (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (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) (/.f64 (.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)))) 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))
(.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(neg.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(-.f64 (+.f64 (.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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)))) (.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 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))
(+.f64 (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(-.f64 (+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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))))) (.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 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))
(+.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.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) (.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)))) (pow.f64 y-scale 4))) (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.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 (sin.f64 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.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) (.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)))) (pow.f64 y-scale 4))) (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(-.f64 (+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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 1/4 (/.f64 (.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 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 (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 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))
(+.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.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) (.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)))) (pow.f64 y-scale 4))) (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/4 (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (/.f64 (.f64 (.f64 (pow.f64 y-scale 6) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (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) (/.f64 (.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)))) 2)) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.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 (sin.f64 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.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) (.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)))) (pow.f64 y-scale 4))) (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/4 (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (/.f64 (.f64 (.f64 (pow.f64 y-scale 6) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (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) (/.f64 (.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)))) 2)) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 x-scale x-scale)))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 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 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (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 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) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 x-scale x-scale)))) (.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 (.f64 (pow.f64 (cos.f64 (.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 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 x-scale x-scale))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 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 (.f64 (pow.f64 (cos.f64 (.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 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))))) (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (pow.f64 x-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 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 -1/2 (/.f64 (.f64 x-scale x-scale) (/.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 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.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)))) (neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 x-scale x-scale))))) (.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 (.f64 (pow.f64 (cos.f64 (.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 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (fma.f64 -1/2 (/.f64 (.f64 x-scale x-scale) (/.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 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.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)))) (neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 x-scale x-scale)))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 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 (.f64 (pow.f64 (cos.f64 (.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 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))))) (+.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 x-scale 4) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)))) (.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (pow.f64 x-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 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 -1/2 (/.f64 (.f64 x-scale x-scale) (/.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 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.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 1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) (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 x-scale 4) (-.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 (.f64 (pow.f64 (cos.f64 (.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 (.f64 b b) (pow.f64 (cos.f64 (.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))))) (neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 x-scale x-scale)))))) (.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 (.f64 (pow.f64 (cos.f64 (.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 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (fma.f64 -1/2 (/.f64 (.f64 x-scale x-scale) (/.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 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.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 1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) (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 x-scale 4) (-.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 (.f64 (pow.f64 (cos.f64 (.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 (.f64 b b) (pow.f64 (cos.f64 (.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))))) (neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 x-scale x-scale))))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 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 (.f64 (pow.f64 (cos.f64 (.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 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (*.f64 x-scale x-scale)))
(+.f64 (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 x-scale 2))) (.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)))))))
(fma.f64 -1 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (.f64 x-scale x-scale)) (.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 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.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 y-scale y-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))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (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 1/4 (/.f64 (.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3))))))
(fma.f64 -1 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (.f64 x-scale x-scale)) (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 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.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 y-scale y-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))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 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 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 (cos.f64 (.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))))))))
(+.f64 (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (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 1/2 (/.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 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 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 (cos.f64 (.f64 1/180 (.f64 angle (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))) 4))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 8) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 1/4 (/.f64 (.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3)))))))
(fma.f64 -1 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (.f64 x-scale x-scale)) (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 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.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 y-scale y-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))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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))) (fma.f64 1/2 (/.f64 (fma.f64 -1/4 (/.f64 (.f64 (.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) (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 (.f64 (pow.f64 (cos.f64 (.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)))) (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/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 (.f64 (pow.f64 (cos.f64 (.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)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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)) (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 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 8))) (.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 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 (cos.f64 (.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)))))))))
(.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (*.f64 x-scale x-scale)))
(+.f64 (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 x-scale 2))) (.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)))))))
(fma.f64 -1 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (.f64 x-scale x-scale)) (.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 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.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 y-scale y-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))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (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 1/4 (/.f64 (.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3))))))
(fma.f64 -1 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (.f64 x-scale x-scale)) (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 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.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 y-scale y-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))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 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 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 (cos.f64 (.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))))))))
(+.f64 (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (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 1/2 (/.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 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 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 (cos.f64 (.f64 1/180 (.f64 angle (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))) 4))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 8) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 1/4 (/.f64 (.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3)))))))
(fma.f64 -1 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (.f64 x-scale x-scale)) (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 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.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 y-scale y-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))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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))) (fma.f64 1/2 (/.f64 (fma.f64 -1/4 (/.f64 (.f64 (.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) (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 (.f64 (pow.f64 (cos.f64 (.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)))) (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/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 (.f64 (pow.f64 (cos.f64 (.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)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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)) (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 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 8))) (.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 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 (cos.f64 (.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)))))))))
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 (PI.f64) 4) (pow.f64 angle 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 (PI.f64) 6) (pow.f64 angle 6)) (+.f64 1 (fma.f64 1/25194240000 (.f64 (pow.f64 (PI.f64) 4) (pow.f64 angle 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 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))))
(fma.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)) (.f64 1/180 (*.f64 angle (PI.f64))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)))))
(fma.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)) (fma.f64 1/180 (.f64 angle (PI.f64)) (.f64 1/22674816000000 (.f64 (pow.f64 (PI.f64) 5) (pow.f64 angle 5)))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (+.f64 (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5))) (.f64 -1/30855889612800000000 (.f64 (pow.f64 angle 7) (pow.f64 (PI.f64) 7))))))
(fma.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)) (fma.f64 1/180 (.f64 angle (PI.f64)) (fma.f64 1/22674816000000 (.f64 (pow.f64 (PI.f64) 5) (pow.f64 angle 5)) (.f64 -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 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(.f64 1/2 (+.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (.f64 (pow.f64 b 4) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (/.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(.f64 1/2 (+.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (.f64 a a) (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (.f64 (pow.f64 b 4) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (/.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 a 4) (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1 (/.f64 (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 4) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-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 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 b 2)))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.f64 1/2 (.f64 (pow.f64 a 4) (-.f64 (.f64 (.f64 -1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2)) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (/.f64 (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.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 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 4)))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 b b))))) (.f64 1/2 (+.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (.f64 (pow.f64 b 4) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (/.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(fma.f64 1/2 (.f64 (pow.f64 a 4) (-.f64 (.f64 (.f64 -1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)))))) 2)) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (/.f64 (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.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 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 4)))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 b b))))) (.f64 1/2 (+.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (.f64 a a) (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (.f64 (pow.f64 b 4) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (/.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 a 6) (-.f64 (.f64 1/4 (.f64 (/.f64 (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))) 2)) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-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 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) (.f64 -1 (/.f64 (-.f64 (.f64 -1/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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (.f64 -1 (/.f64 (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 b 2)))) (pow.f64 b 2)))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 a 4) (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1 (/.f64 (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 4) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-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 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 b 2)))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(fma.f64 1/2 (.f64 (pow.f64 a 6) (-.f64 (.f64 (.f64 1/4 (.f64 (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2)) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (neg.f64 (/.f64 (-.f64 (.f64 (.f64 -1/2 (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2)) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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))))))) (neg.f64 (/.f64 (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (.f64 (pow.f64 b 4) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (/.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 b b)))) (.f64 b b))))) (fma.f64 1/2 (.f64 (pow.f64 a 4) (-.f64 (.f64 (.f64 -1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2)) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (/.f64 (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.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 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 4)))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 b b))))) (.f64 1/2 (+.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (.f64 (pow.f64 b 4) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (/.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(fma.f64 1/2 (.f64 (pow.f64 a 6) (-.f64 (.f64 1/4 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)))))) 2))) (/.f64 (.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)))))))) (neg.f64 (/.f64 (-.f64 (.f64 -1/2 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)))))) 2))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (/.f64 (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (.f64 (pow.f64 b 4) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (/.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 b b)))) (.f64 b b))))) (fma.f64 1/2 (.f64 (pow.f64 a 4) (-.f64 (.f64 (.f64 -1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)))))) 2)) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (/.f64 (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.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 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 4)))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 b b))))) (.f64 1/2 (+.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (.f64 a a) (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (.f64 (pow.f64 b 4) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (/.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))))
(.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(/.f64 (.f64 (-.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) -1/2) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(+.f64 (.f64 1/2 (/.f64 (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 b b) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) (.f64 a a)) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 b b) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (.f64 a a)) (/.f64 (.f64 (-.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) -1/2) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 1/2 (/.f64 (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 -1 (.f64 (pow.f64 b 2) (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 a 4))) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 b b) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) (.f64 a a)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 b b) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))))) (pow.f64 a 4)) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 b b) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (.f64 a a)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (+.f64 (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 b b) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))))) (pow.f64 a 4)) (/.f64 (.f64 (-.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) -1/2) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (.f64 1/2 (/.f64 (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 -1/4 (.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 (-.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)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1 (.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2)))) (pow.f64 b 2)))) (pow.f64 a 6))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 -1 (.f64 (pow.f64 b 2) (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 a 4))) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 b b) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) (.f64 a a)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 (.f64 -1/4 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) (/.f64 (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))))))) 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 b b) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))))))))) (pow.f64 a 6)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 b b) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))))) (pow.f64 a 4)) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 b b) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (.f64 a a)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 (.f64 -1/4 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) (/.f64 (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 1/2 (.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 b b) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))))))) (pow.f64 a 6)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (+.f64 (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 b b) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))))) (pow.f64 a 4)) (/.f64 (.f64 (-.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) -1/2) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(/.f64 (.f64 (-.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) -1/2) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(+.f64 (.f64 1/2 (/.f64 (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 b b) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) (.f64 a a)) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 b b) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (.f64 a a)) (/.f64 (.f64 (-.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) -1/2) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 1/2 (/.f64 (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 -1 (.f64 (pow.f64 b 2) (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 a 4))) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 b b) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) (.f64 a a)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 b b) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))))) (pow.f64 a 4)) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 b b) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (.f64 a a)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (+.f64 (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 b b) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))))) (pow.f64 a 4)) (/.f64 (.f64 (-.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) -1/2) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (.f64 1/2 (/.f64 (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 -1/4 (.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 (-.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)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1 (.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2)))) (pow.f64 b 2)))) (pow.f64 a 6))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 -1 (.f64 (pow.f64 b 2) (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 a 4))) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 b b) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) (.f64 a a)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 (.f64 -1/4 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) (/.f64 (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))))))) 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 b b) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))))))))) (pow.f64 a 6)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 b b) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))))) (pow.f64 a 4)) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 b b) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (.f64 a a)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 (.f64 -1/4 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) (/.f64 (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 1/2 (.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 b b) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))))))) (pow.f64 a 6)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (+.f64 (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (/.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 b b) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))))) (pow.f64 a 4)) (/.f64 (.f64 (-.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) -1/2) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(.f64 90 (/.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))
(/.f64 (.f64 90 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))
(+.f64 (.f64 90 (/.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 1/2 (.f64 angle (-.f64 (.f64 180 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))))))
(fma.f64 90 (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 1/2 angle) (fma.f64 180 (/.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (neg.f64 (.f64 32400 (.f64 (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (*.f64 (pow.f64 (PI.f64) 3) -1/8748000) (pow.f64 (PI.f64) 2))))))))
(fma.f64 90 (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 1/2 angle) (fma.f64 180 (/.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (neg.f64 (/.f64 (.f64 32400 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 b b) (.f64 a a))) (*.f64 (pow.f64 (PI.f64) 3) -1/8748000)))))))
(+.f64 (.f64 90 (/.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.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/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 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))) (PI.f64))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 32400 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))) (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64))))))) (.f64 1/2 (.f64 angle (-.f64 (.f64 180 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))))))
(fma.f64 90 (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 1/2 (+.f64 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (-.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/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 2/45 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 x-scale x-scale))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 32400 (.f64 (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000)) (pow.f64 (PI.f64) 2))) (.f64 180 (/.f64 (fma.f64 180 (/.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (neg.f64 (.f64 32400 (.f64 (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (pow.f64 (PI.f64) 2)))))) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))))))) (.f64 angle (fma.f64 180 (/.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (neg.f64 (.f64 32400 (.f64 (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (pow.f64 (PI.f64) 2))))))))))
(fma.f64 90 (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 1/2 (+.f64 (.f64 angle (fma.f64 180 (/.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (neg.f64 (/.f64 (.f64 32400 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)))))) (.f64 (pow.f64 angle 3) (-.f64 (/.f64 (.f64 (-.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/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (fma.f64 2/45 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))) 180) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 32400 (.f64 (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000)) (pow.f64 (PI.f64) 2))) (.f64 180 (/.f64 (fma.f64 180 (/.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (neg.f64 (/.f64 (.f64 32400 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))))) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))))))))))
(+.f64 (.f64 90 (/.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.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/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 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))) (PI.f64))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 32400 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))) (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (/.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 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (/.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 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 1/45 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))) (PI.f64))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 1/45 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (PI.f64) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (.f64 1/2 (/.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (.f64 2/45 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))) (PI.f64))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-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 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 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)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (PI.f64))) (+.f64 (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.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/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 (.f64 2/45 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))) (PI.f64))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 32400 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))) (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64))) (.f64 32400 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 -1/881596846080000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 -1/1469328076800000000 (pow.f64 (PI.f64) 7)) (.f64 -1/30855889612800000000 (pow.f64 (PI.f64) 7)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))))))) (.f64 1/2 (.f64 angle (-.f64 (.f64 180 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))))))))
(fma.f64 90 (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 1/2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (-.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/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 2/45 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 x-scale x-scale))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 32400 (.f64 (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000)) (pow.f64 (PI.f64) 2))) (.f64 180 (/.f64 (fma.f64 180 (/.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (neg.f64 (.f64 32400 (.f64 (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (pow.f64 (PI.f64) 2)))))) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))))))) (.f64 1/2 (+.f64 (.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (/.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)))) (fma.f64 1/2 (/.f64 (+.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) 2) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))))) (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a)))))) (.f64 1/45 (+.f64 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (PI.f64) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000))) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (PI.f64) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000))) (.f64 x-scale x-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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (fma.f64 2/45 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 a a) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 180 (/.f64 (fma.f64 180 (/.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (neg.f64 (.f64 32400 (.f64 (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (pow.f64 (PI.f64) 2)))))) (/.f64 (PI.f64) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000)))) (fma.f64 180 (/.f64 (-.f64 (.f64 180 (/.f64 (-.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/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (fma.f64 2/45 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 32400 (.f64 (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000)) (pow.f64 (PI.f64) 2))) (.f64 180 (/.f64 (fma.f64 180 (/.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (neg.f64 (.f64 32400 (.f64 (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (pow.f64 (PI.f64) 2)))))) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)))))) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))) (.f64 32400 (.f64 (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (fma.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7) (fma.f64 -1/881596846080000000 (pow.f64 (PI.f64) 7) (.f64 (pow.f64 (PI.f64) 7) -11/15427944806400000000))) (pow.f64 (PI.f64) 2)))))))) (.f64 angle (fma.f64 180 (/.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (neg.f64 (.f64 32400 (.f64 (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (*.f64 (pow.f64 (PI.f64) 3) -1/8748000) (pow.f64 (PI.f64) 2)))))))))))
(fma.f64 90 (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 1/2 (.f64 (pow.f64 angle 3) (-.f64 (/.f64 (.f64 (-.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/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (fma.f64 2/45 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))) 180) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 32400 (.f64 (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000)) (pow.f64 (PI.f64) 2))) (.f64 180 (/.f64 (fma.f64 180 (/.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (neg.f64 (/.f64 (.f64 32400 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))))) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))))))) (.f64 1/2 (+.f64 (.f64 angle (fma.f64 180 (/.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (neg.f64 (/.f64 (.f64 32400 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)))))) (.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))) (fma.f64 1/2 (/.f64 (+.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) 2) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))))) (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a)))))) (.f64 1/45 (+.f64 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (PI.f64) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000))) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (PI.f64) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000))) (.f64 x-scale x-scale)))))))) (/.f64 (.f64 -1/2 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (fma.f64 2/45 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 a a) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 180 (/.f64 (fma.f64 180 (/.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (neg.f64 (/.f64 (.f64 32400 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))))) (/.f64 (PI.f64) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000)))) (fma.f64 180 (/.f64 (-.f64 (/.f64 (.f64 (-.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/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (fma.f64 2/45 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))) 180) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 32400 (.f64 (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000)) (pow.f64 (PI.f64) 2))) (.f64 180 (/.f64 (fma.f64 180 (/.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 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 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (neg.f64 (/.f64 (.f64 32400 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))))) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)))))) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))) (/.f64 (.f64 32400 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7) (fma.f64 -1/881596846080000000 (pow.f64 (PI.f64) 7) (*.f64 (pow.f64 (PI.f64) 7) -11/15427944806400000000)))))))))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 y-scale y-scale)))))) (/.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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (-.f64 (/.f64 (.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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 y-scale y-scale))))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 y-scale y-scale)))))) (/.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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (-.f64 (/.f64 (.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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 y-scale y-scale))))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 y-scale y-scale)))))) (/.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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (-.f64 (/.f64 (.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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 y-scale y-scale))))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 y-scale y-scale)))))) (/.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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (-.f64 (/.f64 (.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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 y-scale y-scale))))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 -1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 -1/2 (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (.f64 (-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 1 (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))) (pow.f64 b 2))))
(fma.f64 -1/2 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (.f64 (.f64 b b) (-.f64 (fma.f64 -1 (/.f64 (-.f64 (/.f64 (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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (/.f64 1 (.f64 (pow.f64 a 4) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 a a)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(+.f64 (.f64 1/2 (.f64 (-.f64 (.f64 1/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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 1 (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)))) (pow.f64 b 4))) (+.f64 (.f64 -1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (.f64 (-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 1 (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))) (pow.f64 b 2)))))
(fma.f64 1/2 (.f64 (pow.f64 b 4) (-.f64 (.f64 1/2 (/.f64 (.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (/.f64 (-.f64 (fma.f64 -1 (/.f64 (-.f64 (/.f64 (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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (/.f64 1 (.f64 (pow.f64 a 4) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 a a))))) (fma.f64 -1/2 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (.f64 (.f64 b b) (-.f64 (fma.f64 -1 (/.f64 (-.f64 (/.f64 (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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (/.f64 1 (.f64 (pow.f64 a 4) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 a a)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(+.f64 (.f64 1/2 (.f64 (-.f64 (.f64 1/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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 1 (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)))) (pow.f64 b 4))) (+.f64 (.f64 -1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (.f64 (-.f64 (.f64 -1/4 (.f64 (/.f64 (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2)) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (.f64 1/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 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (.f64 -1 (/.f64 (-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 1 (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)))) (pow.f64 a 2)))) (pow.f64 b 6))) (.f64 1/2 (.f64 (-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 1 (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))) (pow.f64 b 2))))))
(fma.f64 1/2 (.f64 (pow.f64 b 4) (-.f64 (.f64 1/2 (/.f64 (.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (/.f64 (-.f64 (fma.f64 -1 (/.f64 (-.f64 (/.f64 (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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (/.f64 1 (.f64 (pow.f64 a 4) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 a a))))) (fma.f64 -1/2 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (+.f64 (.f64 (pow.f64 b 6) (-.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2)) (.f64 a a)) (/.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))))) (neg.f64 (/.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (/.f64 (-.f64 (fma.f64 -1 (/.f64 (-.f64 (/.f64 (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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (/.f64 1 (.f64 (pow.f64 a 4) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 a a)))) (.f64 a a))))) (.f64 (.f64 b b) (-.f64 (fma.f64 -1 (/.f64 (-.f64 (/.f64 (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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (/.f64 1 (.f64 (pow.f64 a 4) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 a a)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))))
(fma.f64 1/2 (.f64 (pow.f64 b 4) (-.f64 (.f64 1/2 (/.f64 (.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (/.f64 (-.f64 (fma.f64 -1 (/.f64 (-.f64 (/.f64 (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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (/.f64 1 (.f64 (pow.f64 a 4) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 a a))))) (fma.f64 -1/2 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (+.f64 (.f64 (.f64 b b) (-.f64 (fma.f64 -1 (/.f64 (-.f64 (/.f64 (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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (/.f64 1 (.f64 (pow.f64 a 4) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 (pow.f64 b 6) (-.f64 (.f64 -1/4 (/.f64 (.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (/.f64 (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))))) (neg.f64 (/.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (/.f64 (-.f64 (fma.f64 -1 (/.f64 (-.f64 (/.f64 (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 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (/.f64 (.f64 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (/.f64 1 (.f64 (pow.f64 a 4) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 a a)))) (*.f64 a a)))))))))
(.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 1/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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 1/2 (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2))))
(.f64 1/2 (+.f64 (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (.f64 (/.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 b b))))
(.f64 1/2 (+.f64 (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (.f64 (/.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 b b))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))) (pow.f64 b 4)))))
(fma.f64 1/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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (+.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (.f64 (/.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 b b)) (/.f64 (-.f64 (.f64 (.f64 -1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (.f64 (/.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))) (pow.f64 b 4)))))
(fma.f64 1/2 (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (+.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (.f64 (/.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 b b)) (/.f64 (-.f64 (/.f64 (.f64 (.f64 -1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (.f64 (/.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))) (pow.f64 b 4)))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/4 (.f64 (/.f64 (.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (pow.f64 a 2) (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))))) (pow.f64 b 6))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))) (pow.f64 b 4))))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 (.f64 1/4 (.f64 (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2))) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a a) (-.f64 (.f64 (.f64 -1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (.f64 (/.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))))) (pow.f64 b 6)) (fma.f64 1/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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (+.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (.f64 (/.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 b b)) (/.f64 (-.f64 (.f64 (.f64 -1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (.f64 (/.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))) (pow.f64 b 4))))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 (.f64 1/4 (.f64 (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2))) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a a) (-.f64 (/.f64 (.f64 (.f64 -1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (.f64 (/.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))))) (pow.f64 b 6)) (fma.f64 1/2 (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (+.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (.f64 (/.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 b b)) (/.f64 (-.f64 (/.f64 (.f64 (.f64 -1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (.f64 (/.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))) (pow.f64 b 4))))))
(.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 1/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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 1/2 (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2))))
(.f64 1/2 (+.f64 (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (.f64 (/.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 b b))))
(.f64 1/2 (+.f64 (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (.f64 (/.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 b b))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))) (pow.f64 b 4)))))
(fma.f64 1/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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (+.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (.f64 (/.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 b b)) (/.f64 (-.f64 (.f64 (.f64 -1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (.f64 (/.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))) (pow.f64 b 4)))))
(fma.f64 1/2 (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (+.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (.f64 (/.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 b b)) (/.f64 (-.f64 (/.f64 (.f64 (.f64 -1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (.f64 (/.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))) (pow.f64 b 4)))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/4 (.f64 (/.f64 (.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (pow.f64 a 2) (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))))) (pow.f64 b 6))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))) (pow.f64 b 4))))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 (.f64 1/4 (.f64 (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2))) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a a) (-.f64 (.f64 (.f64 -1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (.f64 (/.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))))) (pow.f64 b 6)) (fma.f64 1/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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (+.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (.f64 (/.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 b b)) (/.f64 (-.f64 (.f64 (.f64 -1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (.f64 (/.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))) (pow.f64 b 4))))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 (.f64 1/4 (.f64 (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2))) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a a) (-.f64 (/.f64 (.f64 (.f64 -1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (.f64 (/.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))))) (pow.f64 b 6)) (fma.f64 1/2 (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (+.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (.f64 (/.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 b b)) (/.f64 (-.f64 (/.f64 (.f64 (.f64 -1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 4 (.f64 (.f64 (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 a 4))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) 2)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (.f64 (/.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 -4 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))) (pow.f64 b 4))))))
(.f64 -1/2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 -1/2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1/4 (/.f64 (.f64 (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 (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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(fma.f64 -1/2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1/4 (.f64 (/.f64 (.f64 y-scale y-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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.f64 -1/2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 -1/4 (.f64 y-scale y-scale)) (/.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 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a))))) 2)))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 (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 (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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 1/8 (/.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 y-scale 4) (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/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) (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))
(fma.f64 -1/2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 -1/4 (.f64 (/.f64 (.f64 y-scale y-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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/8 (.f64 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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)) (/.f64 (.f64 (pow.f64 y-scale 4) (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))
(fma.f64 -1/2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 -1/4 (.f64 (/.f64 (.f64 y-scale y-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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 1/8 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (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 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 (pow.f64 y-scale 4) (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 (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 (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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (+.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 1/8 (/.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 y-scale 4) (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/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) (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))))
(fma.f64 -1/2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 -1/4 (.f64 (/.f64 (.f64 y-scale y-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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (fma.f64 1/4 (.f64 (/.f64 (pow.f64 y-scale 6) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 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 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (/.f64 (.f64 (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 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/8 (.f64 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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)) (/.f64 (.f64 (pow.f64 y-scale 4) (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))))
(fma.f64 -1/2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 -1/4 (.f64 (/.f64 (.f64 y-scale y-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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (fma.f64 1/4 (/.f64 (.f64 (/.f64 (pow.f64 y-scale 6) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 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 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (.f64 -1/4 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (/.f64 (.f64 (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 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 1/8 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (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 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 (pow.f64 y-scale 4) (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))))))
(.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 -1/2 (/.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))) (pow.f64 y-scale 2))))
(fma.f64 -1/2 (/.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (+.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 (/.f64 (.f64 a a) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 y-scale y-scale))))
(fma.f64 -1/2 (/.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (+.f64 (/.f64 (.f64 (/.f64 (.f64 a a) (-.f64 (.f64 b b) (.f64 a a))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (.f64 (/.f64 (.f64 b b) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (.f64 y-scale y-scale))))
(+.f64 (.f64 -1/4 (/.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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 4) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 y-scale 2)))))
(fma.f64 -1/4 (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (.f64 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 y-scale 4)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (fma.f64 -1/2 (/.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (+.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 (/.f64 (.f64 a a) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (*.f64 y-scale y-scale)))))
(fma.f64 -1/4 (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (.f64 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 y-scale 4)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (fma.f64 -1/2 (/.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (+.f64 (/.f64 (.f64 (/.f64 (.f64 a a) (-.f64 (.f64 b b) (.f64 a a))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (.f64 (/.f64 (.f64 b b) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (*.f64 y-scale y-scale)))))
(+.f64 (.f64 -1/4 (/.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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 4) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 y-scale 2))) (.f64 1/8 (/.f64 (.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale 6) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))))
(fma.f64 -1/4 (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (.f64 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 y-scale 4)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (fma.f64 -1/2 (/.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 1/2 (/.f64 (+.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 (/.f64 (.f64 a a) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 y-scale y-scale)) (.f64 1/8 (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (/.f64 (.f64 (.f64 (pow.f64 y-scale 6) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (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) (/.f64 (.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)))) 2) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))))
(fma.f64 -1/4 (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (.f64 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 y-scale 4)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (fma.f64 -1/2 (/.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 1/2 (/.f64 (+.f64 (/.f64 (.f64 (/.f64 (.f64 a a) (-.f64 (.f64 b b) (.f64 a a))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (.f64 (/.f64 (.f64 b b) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (.f64 y-scale y-scale)) (.f64 1/8 (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (/.f64 (.f64 (.f64 (pow.f64 y-scale 6) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (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) (/.f64 (.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)))) 2) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))))
(.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 -1/2 (/.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))) (pow.f64 y-scale 2))))
(fma.f64 -1/2 (/.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (-.f64 (.f64 (/.f64 (.f64 a a) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (.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 (.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 y-scale y-scale))))
(fma.f64 -1/2 (/.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (-.f64 (/.f64 (.f64 (/.f64 (.f64 a a) (-.f64 (.f64 b b) (.f64 a a))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (.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 (.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 y-scale y-scale))))
(+.f64 (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 y-scale 2)))))
(fma.f64 -1/4 (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (.f64 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 y-scale 4)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (fma.f64 -1/2 (/.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (-.f64 (.f64 (/.f64 (.f64 a a) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (.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 (.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 y-scale y-scale)))))
(fma.f64 -1/4 (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (.f64 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 y-scale 4)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (fma.f64 -1/2 (/.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (-.f64 (/.f64 (.f64 (/.f64 (.f64 a a) (-.f64 (.f64 b b) (.f64 a a))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (.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 (.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 y-scale y-scale)))))
(+.f64 (.f64 1/8 (/.f64 (.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (+.f64 (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 y-scale 2))))))
(fma.f64 1/8 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (pow.f64 y-scale 6)) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (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) (/.f64 (.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)))) 2) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (fma.f64 -1/4 (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (.f64 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 y-scale 4)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (fma.f64 -1/2 (/.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (-.f64 (.f64 (/.f64 (.f64 a a) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (.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 (.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 y-scale y-scale))))))
(fma.f64 1/8 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (pow.f64 y-scale 6)) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (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) (/.f64 (.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)))) 2) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (fma.f64 -1/4 (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (.f64 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 y-scale 4)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (fma.f64 -1/2 (/.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (-.f64 (/.f64 (.f64 (/.f64 (.f64 a a) (-.f64 (.f64 b b) (.f64 a a))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (.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 (.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 y-scale y-scale))))))
(.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (.f64 1/2 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (cos.f64 (.f64 1/180 (.f64 angle (PI.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 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(fma.f64 1/2 (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 b b) (.f64 a a))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 (cos.f64 (.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))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.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/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (.f64 1/2 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (cos.f64 (.f64 1/180 (.f64 angle (PI.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 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(fma.f64 1/2 (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 b b) (.f64 a a))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 (cos.f64 (.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))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.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 (/.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.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 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/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))))) 2)) (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.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/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(+.f64 (.f64 1/8 (/.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 x-scale 4) (-.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (+.f64 (.f64 1/2 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (cos.f64 (.f64 1/180 (.f64 angle (PI.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 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))))
(fma.f64 1/8 (/.f64 (.f64 (.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) (pow.f64 x-scale 4)) (-.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 (.f64 (pow.f64 (cos.f64 (.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 (.f64 b b) (pow.f64 (cos.f64 (.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 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.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/2 (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 b b) (.f64 a a))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 (cos.f64 (.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))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.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 (/.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.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 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/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))))) 2)) (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.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/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1/4 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(fma.f64 -1/2 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/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 (.f64 (pow.f64 (cos.f64 (.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)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 x-scale 4) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(+.f64 (.f64 1/8 (/.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) (.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))) 3) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1/4 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))
(fma.f64 1/8 (.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 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (.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 (.f64 (pow.f64 (cos.f64 (.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))) (.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 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (fma.f64 -1/2 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/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 (.f64 (pow.f64 (cos.f64 (.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)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 x-scale 4) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))
(+.f64 (.f64 1/8 (/.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) (.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))) 3) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 1/4 (/.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 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 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 (cos.f64 (.f64 1/180 (.f64 angle (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))) 4))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 8) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -1/4 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))))
(fma.f64 1/8 (.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 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (.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 (.f64 (pow.f64 (cos.f64 (.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))) (.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 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (fma.f64 -1/2 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 1/4 (/.f64 (fma.f64 -1/4 (/.f64 (.f64 (.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) (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 (.f64 (pow.f64 (cos.f64 (.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)))) (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/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 (.f64 (pow.f64 (cos.f64 (.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)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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)) (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 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (pow.f64 x-scale 8) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/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 (.f64 (pow.f64 (cos.f64 (.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)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 x-scale 4) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))))
(.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1/4 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(fma.f64 -1/2 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/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 (.f64 (pow.f64 (cos.f64 (.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)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 x-scale 4) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(+.f64 (.f64 1/8 (/.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) (.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))) 3) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1/4 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))
(fma.f64 1/8 (.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 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (.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 (.f64 (pow.f64 (cos.f64 (.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))) (.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 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (fma.f64 -1/2 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/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 (.f64 (pow.f64 (cos.f64 (.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)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 x-scale 4) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))
(+.f64 (.f64 1/8 (/.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) (.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))) 3) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 1/4 (/.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 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 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 (cos.f64 (.f64 1/180 (.f64 angle (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))) 4))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 8) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -1/4 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))))
(fma.f64 1/8 (.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 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (.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 (.f64 (pow.f64 (cos.f64 (.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))) (.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 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (fma.f64 -1/2 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 1/4 (/.f64 (fma.f64 -1/4 (/.f64 (.f64 (.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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)))))) (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 (.f64 (pow.f64 (cos.f64 (.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)))) (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/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 (.f64 (pow.f64 (cos.f64 (.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)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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)) (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 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (pow.f64 x-scale 8) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/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 (.f64 (pow.f64 (cos.f64 (.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)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 x-scale 4) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.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 y-scale y-scale)) (neg.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))))
(-.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 (+.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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))))))))
(.f64 1 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))))
(-.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 (+.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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))))))))
(.f64 (sqrt.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))))) (sqrt.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))))))
(-.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 (+.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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))))))))
(.f64 (.f64 (cbrt.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))))) (cbrt.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))))) (cbrt.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))))))
(-.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 (+.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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))))))))
(/.f64 (-.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 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 y-scale y-scale))) (.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) 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)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))))
(/.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 (+.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 (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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) (+.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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))))) (+.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 (+.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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))))
(/.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 (+.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 (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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) (+.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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))))) (+.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 (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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))))))) (/.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) 3) (pow.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))) 3)) (+.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 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 y-scale y-scale))) (+.f64 (.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) 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)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))))))
(/.f64 (-.f64 (pow.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)) 3) (pow.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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) 3)) (fma.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 (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 (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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) (+.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 (+.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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))))))
(/.f64 (-.f64 (pow.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)) 3) (pow.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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) 3)) (fma.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 (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 (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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) (+.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 (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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))))))) (/.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)))))))
(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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) 1)
(-.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 (+.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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))))))))
(log.f64 (exp.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))))))
(-.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 (+.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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))))))))
(cbrt.f64 (.f64 (.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) 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)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) 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)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))))))
(cbrt.f64 (.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 (+.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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) (.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 (+.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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) (-.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 (+.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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))))))
(expm1.f64 (log1p.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))))))
(-.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 (+.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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))))))))
(exp.f64 (log.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))))))
(-.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 (+.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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))))))))
(log1p.f64 (expm1.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))))))
(-.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 (+.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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))))))))
(.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))))) (/.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))))))
(/.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 (+.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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (*.f64 (PI.f64) (/.f64 angle 180))))))
(.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (/.f64 1 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))))))
(/.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 (+.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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (*.f64 (PI.f64) (/.f64 angle 180))))))
(.f64 1 (/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))))))
(/.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 (+.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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (*.f64 (PI.f64) (/.f64 angle 180))))))
(.f64 (sqrt.f64 (/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))))))) (sqrt.f64 (/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))))))))
(/.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 (+.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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (*.f64 (PI.f64) (/.f64 angle 180))))))
(.f64 (.f64 (cbrt.f64 (/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))))))) (cbrt.f64 (/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))))))) (cbrt.f64 (/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))))))))
(/.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 (+.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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (*.f64 (PI.f64) (/.f64 angle 180))))))
(pow.f64 (/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))))) 1)
(/.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 (+.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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (*.f64 (PI.f64) (/.f64 angle 180))))))
(log.f64 (exp.f64 (/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))))))))
(/.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 (+.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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (*.f64 (PI.f64) (/.f64 angle 180))))))
(cbrt.f64 (.f64 (.f64 (/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))))) (/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))))))) (/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))))))))
(cbrt.f64 (.f64 (/.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 (+.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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))))) (.f64 (/.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 (+.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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))))) (/.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 (+.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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (*.f64 (PI.f64) (/.f64 angle 180)))))))))
(expm1.f64 (log1p.f64 (/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))))))))
(/.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 (+.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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (*.f64 (PI.f64) (/.f64 angle 180))))))
(exp.f64 (log.f64 (/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))))))))
(/.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 (+.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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (*.f64 (PI.f64) (/.f64 angle 180))))))
(log1p.f64 (expm1.f64 (/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))))))))
(/.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 (+.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 b b) (.f64 a a)) y-scale) (/.f64 2 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))))))))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (*.f64 (PI.f64) (/.f64 angle 180))))))

localize622.0ms (0.4%)

Local Accuracy

Found 4 expressions with local accuracy:

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

Compiler

Compiled 1508 to 1061 computations (29.6% saved)

series252.0ms (0.2%)

Counts

4 → 144

Calls

36 calls:

Time	Variable		Point	Expression
35.0ms	b	@	0	(/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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))
18.0ms	angle	@	-inf	(/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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))
17.0ms	a	@	0	(/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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))
17.0ms	angle	@	0	(/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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))
15.0ms	a	@	inf	(/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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))

rewrite120.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

1116×	`add-sqr-sqrt`
1100×	`*-un-lft-identity`
1084×	`pow1`
1030×	`add-exp-log`
1030×	`add-log-exp`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	46	1002
1	1076	1002

Stop Event

1×	node limit

Counts

4 → 42

Calls

Call 1

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

Outputs
(((.f64 1 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((.f64 (sqrt.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (sqrt.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((.f64 (.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (cbrt.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))))) (cbrt.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((log.f64 (exp.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((cbrt.f64 (.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((expm1.f64 (log1p.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((exp.f64 (log.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((log1p.f64 (expm1.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)))
(((.f64 1 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((.f64 (sqrt.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (sqrt.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((.f64 (.f64 (cbrt.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (cbrt.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))))) (cbrt.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((log.f64 (exp.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((cbrt.f64 (.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((expm1.f64 (log1p.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((exp.f64 (log.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((log1p.f64 (expm1.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)))
(((-.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale))) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 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>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 1 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 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>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((.f64 1 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((.f64 (sqrt.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale)) (sqrt.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((.f64 (.f64 (cbrt.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale)) (cbrt.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale))) (cbrt.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((pow.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-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>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((log.f64 (exp.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((cbrt.f64 (.f64 (.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale) (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale)) (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((expm1.f64 (log1p.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((exp.f64 (log.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((log1p.f64 (expm1.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)))
(((+.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 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>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((.f64 1 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 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>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2)))))) (sqrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 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>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((.f64 (.f64 (cbrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2)))))) (cbrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))))) (cbrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 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>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((/.f64 (-.f64 (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)))) (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))) (+.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 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>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) 3) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))) 3)) (+.f64 (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)))) (+.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2)) (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 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>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((log.f64 (exp.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 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>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((cbrt.f64 (.f64 (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2)))))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 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>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((expm1.f64 (log1p.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 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>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((exp.f64 (log.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 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>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)) ((log1p.f64 (expm1.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 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>) ((sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)) (-.f64 (-.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)) 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)) 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)) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) y-scale) y-scale)) 2) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))) x-scale) y-scale) 2))))) #f)))

simplify1.1s (0.8%)

Algorithm

1×	egg-herbie

Rules

1214×	`+-commutative`
1182×	`*-commutative`
1152×	`associate-*r/`
994×	`associate-*l/`
562×	`associate-+r+`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	1366	240188
1	5357	240182

Stop Event

1×	node limit

Counts

186 → 282

Calls

Call 1

Inputs
(.f64 1/180 (.f64 angle (PI.f64)))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (.f64 1/180 (.f64 angle (PI.f64))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (+.f64 (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5))) (.f64 -1/30855889612800000000 (.f64 (pow.f64 angle 7) (pow.f64 (PI.f64) 7))))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
1
(+.f64 1 (.f64 -1/64800 (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))
(+.f64 1 (+.f64 (.f64 1/25194240000 (.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (.f64 -1/64800 (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2)))))
(+.f64 (.f64 -1/24488801280000000 (.f64 (pow.f64 angle 6) (pow.f64 (PI.f64) 6))) (+.f64 1 (+.f64 (.f64 1/25194240000 (.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (.f64 -1/64800 (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 b 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 b 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (.f64 (pow.f64 a 4) (-.f64 (.f64 -1/2 (.f64 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (/.f64 (-.f64 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 4) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))) (pow.f64 b 2))))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 b 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 a 6) (-.f64 (.f64 1/4 (.f64 (/.f64 (.f64 x-scale (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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)))))) y-scale))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) (.f64 -1 (/.f64 (-.f64 (.f64 -1/2 (.f64 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 -1 (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 b 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2)))) (pow.f64 b 2)))))) (+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (.f64 (pow.f64 a 4) (-.f64 (.f64 -1/2 (.f64 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (/.f64 (-.f64 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 4) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)) x-scale)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 -1 (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 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 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2)))) (pow.f64 a 4))) (+.f64 (.f64 -1/2 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2)))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 -1/4 (.f64 (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) 2))))) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 -1 (.f64 (pow.f64 b 2) (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2))))))) (pow.f64 a 6))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)) x-scale)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 -1 (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 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 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2)))) (pow.f64 a 4))) (+.f64 (.f64 -1/2 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)) x-scale)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 -1 (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 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 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2)))) (pow.f64 a 4))) (+.f64 (.f64 -1/2 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2)))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 -1/4 (.f64 (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) 2))))) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 -1 (.f64 (pow.f64 b 2) (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2))))))) (pow.f64 a 6))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)) x-scale)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 -1 (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 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 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2)))) (pow.f64 a 4))) (+.f64 (.f64 -1/2 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))))))
(.f64 90 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))))) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))
(+.f64 (.f64 90 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))))) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 1/2 (.f64 angle (-.f64 (.f64 180 (/.f64 (.f64 y-scale (.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 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)))))))) x-scale)) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (.f64 y-scale (.f64 x-scale (-.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/2 (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 2/45 (/.f64 (.f64 (+.f64 (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale))) (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 y-scale x-scale))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 32400 (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))) (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (.f64 x-scale (.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 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64))))))) (+.f64 (.f64 90 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))))) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 1/2 (.f64 angle (-.f64 (.f64 180 (/.f64 (.f64 y-scale (.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 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)))))))) x-scale)) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (.f64 y-scale (.f64 x-scale (-.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/2 (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 2/45 (/.f64 (.f64 (+.f64 (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale))) (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 y-scale x-scale))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 32400 (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))) (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (.f64 x-scale (.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 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (/.f64 (.f64 y-scale (.f64 x-scale (-.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 (/.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 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (.f64 1/2 (/.f64 (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))))) (+.f64 (.f64 4 (pow.f64 (+.f64 (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale))) (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale)))) 2)) (.f64 2/45 (/.f64 (.f64 (+.f64 (.f64 1/22674816000000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (.f64 y-scale x-scale))) (+.f64 (.f64 1/4534963200000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (.f64 y-scale x-scale))) (.f64 1/2267481600000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (.f64 y-scale x-scale))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 y-scale x-scale)))))) (.f64 1/2 (/.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (.f64 2/45 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (+.f64 (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 x-scale y-scale))) (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 x-scale y-scale)))) (PI.f64))) (.f64 x-scale y-scale)))))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 32400 (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 -1/881596846080000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 -1/1469328076800000000 (pow.f64 (PI.f64) 7)) (.f64 -1/30855889612800000000 (pow.f64 (PI.f64) 7)))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))) (+.f64 (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (.f64 x-scale (.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 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (PI.f64))) (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (.f64 x-scale (.f64 y-scale (-.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/2 (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (.f64 2/45 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (+.f64 (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 x-scale y-scale))) (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 x-scale y-scale)))) (PI.f64))) (.f64 x-scale y-scale)))))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))) (-.f64 (.f64 180 (/.f64 (.f64 y-scale (.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 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)))))))) x-scale)) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))) (PI.f64))) (.f64 32400 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64)))))))) (+.f64 (.f64 90 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))))) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 1/2 (.f64 angle (-.f64 (.f64 180 (/.f64 (.f64 y-scale (.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 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)))))))) x-scale)) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))))) (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))))))))
(.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -1/2 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 b 4) (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (.f64 -1 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 x-scale (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) y-scale)) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)))))) (.f64 -1/2 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 1/2 (.f64 (-.f64 (.f64 -1/4 (.f64 (/.f64 (.f64 x-scale (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 y-scale (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (pow.f64 a 2) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (.f64 -1 (/.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)))) (pow.f64 a 2)))) (pow.f64 b 6))) (+.f64 (.f64 1/2 (.f64 (pow.f64 b 4) (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (.f64 -1 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 x-scale (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) y-scale)) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)))))) (.f64 -1/2 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (/.f64 (.f64 y-scale (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (pow.f64 b 4))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (/.f64 (.f64 y-scale (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (pow.f64 b 4))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/4 (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (pow.f64 a 2) (-.f64 (.f64 -1/2 (.f64 (/.f64 (.f64 y-scale (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))))) (pow.f64 b 6))) (.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))))
(+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (/.f64 (.f64 y-scale (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (pow.f64 b 4)))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/4 (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.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)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (pow.f64 a 2) (-.f64 (.f64 -1/2 (.f64 (/.f64 (.f64 y-scale (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))))) (pow.f64 b 6))) (+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (/.f64 (.f64 y-scale (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (pow.f64 b 4))))))
(.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1/4 (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale 3) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(+.f64 (.f64 1/8 (/.f64 (.f64 x-scale (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (pow.f64 y-scale 5) (+.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 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.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 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1/4 (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale 3) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(+.f64 (.f64 1/8 (/.f64 (.f64 x-scale (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (pow.f64 y-scale 5) (+.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 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.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 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale 3) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 1/4 (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale 7) (+.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 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))))
(.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 y-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 x-scale (-.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 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 y-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 x-scale (-.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 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 y-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 1/8 (/.f64 (.f64 x-scale (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 5) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))))))
(.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 y-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 x-scale (-.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 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 y-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 x-scale (-.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 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 y-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 1/8 (/.f64 (.f64 x-scale (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 5) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 y-scale (.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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)))))) x-scale)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 y-scale (.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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)))))) x-scale)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 3) (-.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(+.f64 (.f64 1/8 (/.f64 (.f64 (pow.f64 x-scale 5) (.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 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) y-scale))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 1/2 (/.f64 (.f64 y-scale (.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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)))))) x-scale)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 3) (-.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1/4 (/.f64 (.f64 y-scale (-.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 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 1/8 (/.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)) (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 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 5) (.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))) 3) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -1/4 (/.f64 (.f64 y-scale (-.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 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))))
(+.f64 (.f64 1/4 (/.f64 (.f64 y-scale (+.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 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 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 (cos.f64 (.f64 1/180 (.f64 angle (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))) 4))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2))) (.f64 (pow.f64 x-scale 7) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 1/8 (/.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)) (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 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 5) (.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))) 3) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -1/4 (/.f64 (.f64 y-scale (-.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 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1/4 (/.f64 (.f64 y-scale (-.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 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 1/8 (/.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)) (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 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 5) (.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))) 3) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -1/4 (/.f64 (.f64 y-scale (-.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 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))))
(+.f64 (.f64 1/4 (/.f64 (.f64 y-scale (+.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 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 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 (cos.f64 (.f64 1/180 (.f64 angle (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))) 4))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2))) (.f64 (pow.f64 x-scale 7) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 1/8 (/.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)) (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 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 5) (.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))) 3) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -1/4 (/.f64 (.f64 y-scale (-.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 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (/.f64 (.f64 (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 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))))) (+.f64 (/.f64 (.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 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 -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 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)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))))))) (+.f64 (/.f64 (.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 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 -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 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)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))))) (.f64 1/4 (.f64 (/.f64 (.f64 (pow.f64 a 6) (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))))) (+.f64 (/.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))
(.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (/.f64 (.f64 (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 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 -1/2 (.f64 (/.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)) (pow.f64 a 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))) (+.f64 (/.f64 (.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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))
(-.f64 (+.f64 (.f64 1/4 (.f64 (/.f64 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) 2))) (.f64 (pow.f64 a 4) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (+.f64 (/.f64 (.f64 (pow.f64 b 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 -1/2 (.f64 (/.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)) (pow.f64 a 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (+.f64 (/.f64 (.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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))
(.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (/.f64 (.f64 (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 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 -1/2 (.f64 (/.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)) (pow.f64 a 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))) (+.f64 (/.f64 (.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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))
(-.f64 (+.f64 (.f64 1/4 (.f64 (/.f64 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) 2))) (.f64 (pow.f64 a 4) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (+.f64 (/.f64 (.f64 (pow.f64 b 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 -1/2 (.f64 (/.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)) (pow.f64 a 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (+.f64 (/.f64 (.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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))
(-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))
(-.f64 (+.f64 (.f64 2 (/.f64 (pow.f64 a 2) (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 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 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)))))))) (pow.f64 angle 2))) (*.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))
(-.f64 (+.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 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/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 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)))))))) (pow.f64 angle 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/2 (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 2/45 (/.f64 (.f64 (+.f64 (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale))) (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 y-scale x-scale))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 angle 4)))) (*.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))
(-.f64 (+.f64 (.f64 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/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 (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 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (.f64 1/2 (/.f64 (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))))) (+.f64 (.f64 4 (pow.f64 (+.f64 (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale))) (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale)))) 2)) (.f64 2/45 (/.f64 (.f64 (+.f64 (.f64 1/22674816000000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (.f64 y-scale x-scale))) (+.f64 (.f64 1/4534963200000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (.f64 y-scale x-scale))) (.f64 1/2267481600000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (.f64 y-scale x-scale))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 y-scale x-scale)))))) (.f64 1/2 (/.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (.f64 2/45 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (+.f64 (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 x-scale y-scale))) (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 x-scale y-scale)))) (PI.f64))) (.f64 x-scale y-scale)))))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (+.f64 (.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 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)))))))) (pow.f64 angle 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/2 (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 2/45 (/.f64 (.f64 (+.f64 (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale))) (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 y-scale x-scale))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 angle 4))))) (.f64 2 (/.f64 (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 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (+.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-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 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 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 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(-.f64 (+.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 (pow.f64 b 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)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (+.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-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 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 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 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(-.f64 (+.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(-.f64 (+.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 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 b 2)))) (+.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))
(-.f64 (+.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 b 2)))) (+.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (+.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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))
(-.f64 (+.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.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 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (pow.f64 b 2)))))) (+.f64 (/.f64 (.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 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 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.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 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (pow.f64 b 2))))))) (+.f64 (/.f64 (.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 -1 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (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 (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))))) (.f64 -1 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (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 (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))))) (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)))) (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (.f64 -1 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (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 (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))))) (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)))) (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (+.f64 (.f64 -1 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 6) (+.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 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 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 (.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 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.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 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/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 4) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 (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 6) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.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 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/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 4) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 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 (.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 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.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 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/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 4) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 (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 6) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.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 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/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 4) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 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 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))))) (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (pow.f64 x-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 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))))) (+.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 x-scale 4) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)))) (.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (pow.f64 x-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 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 x-scale 2)))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 x-scale 2))))
(+.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))) (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3)))) (+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 x-scale 2)))))
(+.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))) (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3)))) (+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 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 (pow.f64 x-scale 8) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 x-scale 2))))))
(.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 x-scale 2)))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 x-scale 2))))
(+.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))) (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3)))) (+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 x-scale 2)))))
(+.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))) (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3)))) (+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 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 (pow.f64 x-scale 8) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 x-scale 2))))))
(.f64 1 (sin.f64 (.f64 (*.f64 angle 1/180) (PI.f64))))
(.f64 (sqrt.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (sqrt.f64 (sin.f64 (.f64 (*.f64 angle 1/180) (PI.f64)))))
(.f64 (.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (cbrt.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))))) (cbrt.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 1)
(log.f64 (exp.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(cbrt.f64 (.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(expm1.f64 (log1p.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(exp.f64 (log.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(log1p.f64 (expm1.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(.f64 1 (cos.f64 (.f64 (*.f64 angle 1/180) (PI.f64))))
(.f64 (sqrt.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (sqrt.f64 (cos.f64 (.f64 (*.f64 angle 1/180) (PI.f64)))))
(.f64 (.f64 (cbrt.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (cbrt.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))))) (cbrt.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 1)
(log.f64 (exp.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(cbrt.f64 (.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(expm1.f64 (log1p.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(exp.f64 (log.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(log1p.f64 (expm1.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(-.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale))) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale))))
(.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 1 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (*.f64 y-scale x-scale))))
(.f64 1 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a))))) x-scale)) y-scale))
(.f64 (sqrt.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale)) (sqrt.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a))))) x-scale)) y-scale)))
(.f64 (.f64 (cbrt.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale)) (cbrt.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale))) (cbrt.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale)))
(.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale)
(pow.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale) 1)
(log.f64 (exp.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale)))
(cbrt.f64 (.f64 (.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale) (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale)) (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale)))
(expm1.f64 (log1p.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale)))
(exp.f64 (log.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale)))
(log1p.f64 (expm1.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale)))
(+.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2)))))
(.f64 1 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (*.f64 y-scale x-scale)) 2))))))
(.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2)))))) (sqrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (*.f64 y-scale x-scale)) 2)))))))
(.f64 (.f64 (cbrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2)))))) (cbrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))))) (cbrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2)))))))
(/.f64 (-.f64 (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)))) (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))) (+.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (*.f64 y-scale x-scale)) 2)))))
(/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) 3) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))) 3)) (+.f64 (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)))) (+.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2)) (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2)))))))
(pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) 1)
(log.f64 (exp.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2)))))))
(cbrt.f64 (.f64 (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2)))))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2)))))))
(expm1.f64 (log1p.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2)))))))
(exp.f64 (log.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2)))))))
(log1p.f64 (expm1.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2)))))))

Outputs
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 1/180 angle))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (.f64 1/180 (.f64 angle (PI.f64))))
(fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)) (.f64 (PI.f64) (*.f64 1/180 angle)))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)))))
(fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)) (fma.f64 1/180 (.f64 angle (PI.f64)) (.f64 (.f64 1/22674816000000 (pow.f64 angle 5)) (pow.f64 (PI.f64) 5))))
(+.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)))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
1
(+.f64 1 (.f64 -1/64800 (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))
(+.f64 1 (.f64 (.f64 -1/64800 (*.f64 angle angle)) (pow.f64 (PI.f64) 2)))
(+.f64 1 (+.f64 (.f64 1/25194240000 (.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (.f64 -1/64800 (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2)))))
(+.f64 1 (fma.f64 1/25194240000 (.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4)) (.f64 (.f64 -1/64800 (.f64 angle angle)) (pow.f64 (PI.f64) 2))))
(+.f64 (.f64 -1/24488801280000000 (.f64 (pow.f64 angle 6) (pow.f64 (PI.f64) 6))) (+.f64 1 (+.f64 (.f64 1/25194240000 (.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (.f64 -1/64800 (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))))
(fma.f64 -1/24488801280000000 (.f64 (pow.f64 angle 6) (pow.f64 (PI.f64) 6)) (+.f64 1 (fma.f64 1/25194240000 (.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4)) (.f64 (.f64 -1/64800 (*.f64 angle angle)) (pow.f64 (PI.f64) 2)))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 1/2 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale)))))))))) (.f64 (.f64 (.f64 b b) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 b 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(.f64 1/2 (+.f64 (.f64 (.f64 a a) (-.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 (.f64 b b) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 y-scale (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2))))))))) (neg.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2)))))) (.f64 (pow.f64 b 4) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))) (/.f64 x-scale (/.f64 (.f64 (.f64 (.f64 b b) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale)))))))))))))
(.f64 1/2 (+.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 (.f64 b b) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))))))) (.f64 (.f64 a a) (-.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 (.f64 b b) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 y-scale (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2))))))))) (neg.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2))))) (.f64 (pow.f64 b 4) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 b 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (.f64 (pow.f64 a 4) (-.f64 (.f64 -1/2 (.f64 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (/.f64 (-.f64 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 4) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))) (pow.f64 b 2))))))))
(fma.f64 1/2 (.f64 (.f64 a a) (-.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 (.f64 b b) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 y-scale (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2))))))))) (neg.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2)))))) (.f64 (pow.f64 b 4) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))) (.f64 1/2 (+.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 (.f64 b b) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))))))) (.f64 (pow.f64 a 4) (-.f64 (.f64 -1/2 (/.f64 (.f64 (.f64 (.f64 x-scale y-scale) (-.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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))))) 2))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2))))) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (neg.f64 (/.f64 (-.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)))) (neg.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 b 4)))))) (.f64 b b))))))))
(fma.f64 1/2 (.f64 (.f64 a a) (-.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 (.f64 b b) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 y-scale (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2))))))))) (neg.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2))))) (.f64 (pow.f64 b 4) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))) (.f64 1/2 (+.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 (.f64 b b) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))))))) (.f64 (pow.f64 a 4) (-.f64 (.f64 -1/2 (/.f64 (.f64 (.f64 (.f64 x-scale y-scale) (-.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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))))) 2))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2))))) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (neg.f64 (/.f64 (-.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)))) (neg.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 b 4)))))) (.f64 b b))))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 b 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 a 6) (-.f64 (.f64 1/4 (.f64 (/.f64 (.f64 x-scale (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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)))))) y-scale))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) (.f64 -1 (/.f64 (-.f64 (.f64 -1/2 (.f64 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 -1 (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 b 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2)))) (pow.f64 b 2)))))) (+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (.f64 (pow.f64 a 4) (-.f64 (.f64 -1/2 (.f64 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (/.f64 (-.f64 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 4) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2)))))))))
(fma.f64 1/2 (.f64 (.f64 a a) (-.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 (.f64 b b) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 y-scale (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2))))))))) (neg.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2)))))) (.f64 (pow.f64 b 4) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))) (fma.f64 1/2 (.f64 (pow.f64 a 6) (-.f64 (.f64 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2)))) (.f64 (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (-.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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2))))) 2)) (.f64 y-scale (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))))) (.f64 (.f64 (.f64 b b) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale)))))))))) (neg.f64 (/.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))) (/.f64 y-scale (/.f64 (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (-.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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2))))) 2))))))) (neg.f64 (/.f64 (-.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 (.f64 b b) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 y-scale (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2))))))))) (neg.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2)))))) (.f64 (pow.f64 b 4) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))) (.f64 b b)))) (.f64 b b))))) (.f64 1/2 (+.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 (.f64 b b) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))))))) (.f64 (pow.f64 a 4) (-.f64 (.f64 -1/2 (/.f64 (.f64 (.f64 (.f64 x-scale y-scale) (-.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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))))) 2))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2))))) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (neg.f64 (/.f64 (-.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)))) (neg.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 b 4)))))) (.f64 b b)))))))))
(fma.f64 1/2 (.f64 (.f64 a a) (-.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 (.f64 b b) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 y-scale (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2))))))))) (neg.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2))))) (.f64 (pow.f64 b 4) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))) (fma.f64 1/2 (.f64 (pow.f64 a 6) (-.f64 (.f64 1/4 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2)))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 (.f64 b b) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))) (.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2))))) 2)) (.f64 y-scale (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))))))) (neg.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 -1/2 (.f64 (.f64 x-scale y-scale) (-.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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2))))) 2)))) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale)))))))) (neg.f64 (/.f64 (-.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 (.f64 b b) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 y-scale (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2))))))))) (neg.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2))))) (.f64 (pow.f64 b 4) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))) (.f64 b b)))) (.f64 b b))))) (.f64 1/2 (+.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 (.f64 b b) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 y-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))))))) (.f64 (pow.f64 a 4) (-.f64 (.f64 -1/2 (/.f64 (.f64 (.f64 (.f64 x-scale y-scale) (-.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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))))) 2))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2))))) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (neg.f64 (/.f64 (-.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)))) (neg.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 b 4)))))) (*.f64 b b)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(/.f64 (.f64 -1/2 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))))
(fma.f64 -1/2 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 1/2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))))) (*.f64 a a))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)) x-scale)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 -1 (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 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 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2)))) (pow.f64 a 4))) (+.f64 (.f64 -1/2 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2)))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (-.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2)) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))) 2))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))))))))) (pow.f64 a 4)) (fma.f64 -1/2 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 1/2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))))) (*.f64 a a)))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 -1/4 (.f64 (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) 2))))) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 -1 (.f64 (pow.f64 b 2) (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2))))))) (pow.f64 a 6))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)) x-scale)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 -1 (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 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 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2)))) (pow.f64 a 4))) (+.f64 (.f64 -1/2 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 y-scale (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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))) (/.f64 (.f64 (.f64 x-scale (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale)))) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))) 2)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))) (neg.f64 (.f64 (.f64 b b) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale)))) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))) 2)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (neg.f64 (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))))))))))))) (pow.f64 a 6)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (-.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2)) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))) 2))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))))))))) (pow.f64 a 4)) (fma.f64 -1/2 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 1/2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))))) (.f64 a a))))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 -1/4 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) y-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))) (.f64 (.f64 x-scale (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale)))) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))) 2))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (.f64 1/2 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale)))) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))) 2))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))))))))))) (pow.f64 a 6)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (-.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2)) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))) 2))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))))))))) (pow.f64 a 4)) (fma.f64 -1/2 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 1/2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))))) (*.f64 a a))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(/.f64 (.f64 -1/2 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))))
(fma.f64 -1/2 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 1/2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))))) (*.f64 a a))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)) x-scale)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 -1 (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 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 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2)))) (pow.f64 a 4))) (+.f64 (.f64 -1/2 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2)))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (-.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2)) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))) 2))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))))))))) (pow.f64 a 4)) (fma.f64 -1/2 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 1/2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))))) (*.f64 a a)))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 -1/4 (.f64 (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) 2))))) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 -1 (.f64 (pow.f64 b 2) (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2))))))) (pow.f64 a 6))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)) x-scale)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 -1 (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 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 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2)))) (pow.f64 a 4))) (+.f64 (.f64 -1/2 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 y-scale (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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))) (/.f64 (.f64 (.f64 x-scale (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale)))) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))) 2)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))) (neg.f64 (.f64 (.f64 b b) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale)))) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))) 2)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (neg.f64 (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))))))))))))) (pow.f64 a 6)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (-.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2)) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))) 2))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))))))))) (pow.f64 a 4)) (fma.f64 -1/2 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 1/2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))))) (.f64 a a))))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 -1/4 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) y-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))) (.f64 (.f64 x-scale (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale)))) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))) 2))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (.f64 1/2 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale)))) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))) 2))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))))))))))) (pow.f64 a 6)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (-.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2)) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))) 2))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))))))))) (pow.f64 a 4)) (fma.f64 -1/2 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 1/2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))))) (*.f64 a a))))))
(.f64 90 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))))) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))
(.f64 90 (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (*.f64 x-scale x-scale))))))))
(+.f64 (.f64 90 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))))) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 1/2 (.f64 angle (-.f64 (.f64 180 (/.f64 (.f64 y-scale (.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 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)))))))) x-scale)) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))))))
(fma.f64 90 (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 1/2 (.f64 angle (+.f64 (.f64 180 (.f64 (/.f64 y-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 x-scale (-.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.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 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) (PI.f64)))) (.f64 -32400 (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))) (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 b b) (*.f64 a a)))))))))
(fma.f64 90 (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 1/2 (.f64 angle (+.f64 (/.f64 (.f64 (.f64 (.f64 x-scale y-scale) (-.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 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 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))) 180) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 -32400 (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))) (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 b b) (.f64 a a)))))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (.f64 y-scale (.f64 x-scale (-.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/2 (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 2/45 (/.f64 (.f64 (+.f64 (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale))) (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 y-scale x-scale))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 32400 (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))) (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (.f64 x-scale (.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 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64))))))) (+.f64 (.f64 90 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))))) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 1/2 (.f64 angle (-.f64 (.f64 180 (/.f64 (.f64 y-scale (.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 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)))))))) x-scale)) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))))))
(fma.f64 1/2 (.f64 (pow.f64 angle 3) (-.f64 (/.f64 (.f64 180 (.f64 (.f64 x-scale y-scale) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a)))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 2/45 (.f64 (/.f64 (.f64 (.f64 (/.f64 (-.f64 (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (/.f64 (.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 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 180 (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (/.f64 (PI.f64) (+.f64 (.f64 180 (.f64 (/.f64 y-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 x-scale (-.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.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 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) (PI.f64)))) (.f64 -32400 (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))) (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 b b) (.f64 a a)))))))) (/.f64 (.f64 32400 (.f64 (.f64 x-scale y-scale) (.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000))))) (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 90 (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 1/2 (.f64 angle (+.f64 (.f64 180 (.f64 (/.f64 y-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 x-scale (-.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.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 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) (PI.f64)))) (.f64 -32400 (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))) (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 b b) (*.f64 a a))))))))))
(fma.f64 1/2 (.f64 (pow.f64 angle 3) (-.f64 (/.f64 (.f64 180 (.f64 (.f64 x-scale y-scale) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a)))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 2/45 (.f64 (/.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000) (/.f64 (.f64 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 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 (.f64 1/32400 (.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 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 180 (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (/.f64 (PI.f64) (+.f64 (/.f64 (.f64 (.f64 (.f64 x-scale y-scale) (-.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 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 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))) 180) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 -32400 (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))) (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 b b) (.f64 a a)))))))) (/.f64 (.f64 32400 (.f64 (.f64 x-scale y-scale) (.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000))))) (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 90 (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 1/2 (.f64 angle (+.f64 (/.f64 (.f64 (.f64 (.f64 x-scale y-scale) (-.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 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 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))) 180) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 -32400 (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))) (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 b b) (*.f64 a a))))))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (.f64 y-scale (.f64 x-scale (-.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/2 (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 2/45 (/.f64 (.f64 (+.f64 (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale))) (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 y-scale x-scale))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 32400 (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))) (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (.f64 x-scale (.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 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (/.f64 (.f64 y-scale (.f64 x-scale (-.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 (/.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 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (.f64 1/2 (/.f64 (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))))) (+.f64 (.f64 4 (pow.f64 (+.f64 (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale))) (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale)))) 2)) (.f64 2/45 (/.f64 (.f64 (+.f64 (.f64 1/22674816000000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (.f64 y-scale x-scale))) (+.f64 (.f64 1/4534963200000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (.f64 y-scale x-scale))) (.f64 1/2267481600000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (.f64 y-scale x-scale))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 y-scale x-scale)))))) (.f64 1/2 (/.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (.f64 2/45 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (+.f64 (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 x-scale y-scale))) (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 x-scale y-scale)))) (PI.f64))) (.f64 x-scale y-scale)))))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 32400 (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 -1/881596846080000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 -1/1469328076800000000 (pow.f64 (PI.f64) 7)) (.f64 -1/30855889612800000000 (pow.f64 (PI.f64) 7)))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))) (+.f64 (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (.f64 x-scale (.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 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (PI.f64))) (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (.f64 x-scale (.f64 y-scale (-.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/2 (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (.f64 2/45 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (+.f64 (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 x-scale y-scale))) (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 x-scale y-scale)))) (PI.f64))) (.f64 x-scale y-scale)))))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))) (-.f64 (.f64 180 (/.f64 (.f64 y-scale (.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 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)))))))) x-scale)) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))) (PI.f64))) (.f64 32400 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64)))))))) (+.f64 (.f64 90 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))))) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 1/2 (.f64 angle (-.f64 (.f64 180 (/.f64 (.f64 y-scale (.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 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)))))))) x-scale)) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))))) (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))))))))
(fma.f64 1/2 (.f64 (pow.f64 angle 3) (-.f64 (/.f64 (.f64 180 (.f64 (.f64 x-scale y-scale) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a)))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 2/45 (.f64 (/.f64 (.f64 (.f64 (/.f64 (-.f64 (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (/.f64 (.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 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 180 (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (/.f64 (PI.f64) (+.f64 (.f64 180 (.f64 (/.f64 y-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 x-scale (-.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.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 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) (PI.f64)))) (.f64 -32400 (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))) (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 b b) (.f64 a a)))))))) (/.f64 (.f64 32400 (.f64 (.f64 x-scale y-scale) (.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000))))) (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 1/2 (.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (/.f64 (.f64 (.f64 x-scale y-scale) (-.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 (+.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 1/2 (+.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))))) (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a)))))) (fma.f64 4 (pow.f64 (.f64 (.f64 (/.f64 (-.f64 (.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)) y-scale) (/.f64 (pow.f64 (PI.f64) 5) x-scale)) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (pow.f64 (PI.f64) 5) x-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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (+.f64 (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)) (.f64 2/45 (/.f64 (-.f64 (.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))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 32400 (/.f64 y-scale (/.f64 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (fma.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7) (fma.f64 -1/881596846080000000 (pow.f64 (PI.f64) 7) (.f64 (pow.f64 (PI.f64) 7) -11/15427944806400000000)))))) (.f64 180 (+.f64 (/.f64 (+.f64 (.f64 180 (.f64 (/.f64 y-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 x-scale (-.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.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 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) (PI.f64)))) (.f64 -32400 (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))) (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 b b) (.f64 a a)))))) (/.f64 (PI.f64) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000)))) (/.f64 (-.f64 (/.f64 (.f64 180 (.f64 (.f64 x-scale y-scale) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a)))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (+.f64 (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)) (.f64 2/45 (/.f64 (-.f64 (.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 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 180 (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (/.f64 (PI.f64) (+.f64 (.f64 180 (.f64 (/.f64 y-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 x-scale (-.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.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 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) (PI.f64)))) (.f64 -32400 (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))) (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 b b) (.f64 a a)))))))) (/.f64 (.f64 32400 (.f64 (.f64 x-scale y-scale) (.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000))))) (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 b b) (.f64 a a)))))) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)))))))) (fma.f64 90 (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 1/2 (.f64 angle (+.f64 (.f64 180 (.f64 (/.f64 y-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 x-scale (-.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.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 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) (PI.f64)))) (.f64 -32400 (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))) (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 b b) (*.f64 a a)))))))))))
(fma.f64 1/2 (.f64 (pow.f64 angle 3) (-.f64 (/.f64 (.f64 180 (.f64 (.f64 x-scale y-scale) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a)))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 2/45 (.f64 (/.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000) (/.f64 (.f64 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 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 (.f64 1/32400 (.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 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 180 (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (/.f64 (PI.f64) (+.f64 (/.f64 (.f64 (.f64 (.f64 x-scale y-scale) (-.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 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 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))) 180) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 -32400 (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))) (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 b b) (.f64 a a)))))))) (/.f64 (.f64 32400 (.f64 (.f64 x-scale y-scale) (.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000))))) (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 1/2 (.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (/.f64 (.f64 (.f64 x-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-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 a a) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))))) (/.f64 (.f64 1/2 (+.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))))) (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a)))))) (fma.f64 4 (pow.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000) (/.f64 (.f64 x-scale y-scale) (pow.f64 (PI.f64) 3))) 2) (.f64 2/45 (/.f64 (fma.f64 1/22674816000000 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (pow.f64 (PI.f64) 5) x-scale)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) 1/1511654400000) (/.f64 (.f64 x-scale y-scale) (pow.f64 (PI.f64) 5)))) (/.f64 (.f64 x-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))) (/.f64 (.f64 -1/2 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (+.f64 (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 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 (.f64 (/.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)) x-scale) 2/45) y-scale))) (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 (.f64 1/32400 (.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 (.f64 1/32400 (.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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 32400 (/.f64 y-scale (/.f64 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (fma.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7) (fma.f64 -1/881596846080000000 (pow.f64 (PI.f64) 7) (.f64 (pow.f64 (PI.f64) 7) -11/15427944806400000000)))))) (.f64 180 (+.f64 (/.f64 (+.f64 (/.f64 (.f64 (.f64 (.f64 x-scale y-scale) (-.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 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 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))) 180) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 -32400 (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))) (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 b b) (.f64 a a)))))) (/.f64 (PI.f64) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000)))) (/.f64 (-.f64 (/.f64 (.f64 180 (.f64 (.f64 x-scale y-scale) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a)))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (+.f64 (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 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 (.f64 (/.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)) x-scale) 2/45) y-scale))) (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 (.f64 1/32400 (.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 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 180 (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (/.f64 (PI.f64) (+.f64 (/.f64 (.f64 (.f64 (.f64 x-scale y-scale) (-.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 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 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))) 180) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 -32400 (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))) (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 b b) (.f64 a a)))))))) (/.f64 (.f64 32400 (.f64 (.f64 x-scale y-scale) (.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000))))) (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 b b) (.f64 a a)))))) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)))))))) (fma.f64 90 (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 1/2 (.f64 angle (+.f64 (/.f64 (.f64 (.f64 (.f64 x-scale y-scale) (-.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 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 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))) 180) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 -32400 (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))) (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 b b) (*.f64 a a)))))))))))
(.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (.f64 (.f64 x-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (*.f64 a a)))))
(.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (.f64 (.f64 x-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (*.f64 a a)))))
(.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (.f64 (.f64 x-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (*.f64 a a)))))
(.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (.f64 (.f64 x-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (*.f64 a a)))))
(.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (.f64 (.f64 x-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (*.f64 a a)))))
(.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (.f64 (.f64 x-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (*.f64 a a)))))
(.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (.f64 (.f64 x-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (*.f64 a a)))))
(.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (.f64 (.f64 x-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (*.f64 a a)))))
(.f64 -1/2 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a))))
(.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -1/2 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(fma.f64 1/2 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a)) (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))))) (/.f64 x-scale (/.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 a 4)) (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))))))) (.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a)))))
(fma.f64 1/2 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a)) (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))))) (/.f64 x-scale (/.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 a 4)) (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))))))) (.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a)))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 b 4) (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (.f64 -1 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 x-scale (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) y-scale)) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)))))) (.f64 -1/2 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.f64 1/2 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a)) (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))))) (/.f64 x-scale (/.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 a 4)) (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))))))) (fma.f64 1/2 (.f64 (pow.f64 b 4) (-.f64 (.f64 1/2 (/.f64 (.f64 (.f64 (.f64 x-scale y-scale) (-.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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a)))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a)) (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))))) (/.f64 x-scale (/.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 a 4)) (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))))))) (.f64 a a))))) (.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a))))))
(fma.f64 1/2 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a)) (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))))) (/.f64 x-scale (/.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 a 4)) (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))))))) (fma.f64 1/2 (.f64 (pow.f64 b 4) (-.f64 (.f64 1/2 (/.f64 (.f64 (.f64 (.f64 x-scale y-scale) (-.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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a)))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a)) (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))))) (/.f64 x-scale (/.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 a 4)) (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))))) (.f64 a a))))) (.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 1/2 (.f64 (-.f64 (.f64 -1/4 (.f64 (/.f64 (.f64 x-scale (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 y-scale (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (pow.f64 a 2) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (.f64 -1 (/.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)))) (pow.f64 a 2)))) (pow.f64 b 6))) (+.f64 (.f64 1/2 (.f64 (pow.f64 b 4) (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (.f64 -1 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 x-scale (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) y-scale)) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)))))) (.f64 -1/2 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(fma.f64 1/2 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a)) (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))))) (/.f64 x-scale (/.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 a 4)) (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))))))) (fma.f64 1/2 (.f64 (-.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (.f64 (/.f64 x-scale (.f64 a a)) (/.f64 (.f64 (-.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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) 2)) (.f64 y-scale (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))))))) (neg.f64 (/.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (.f64 (.f64 x-scale y-scale) (-.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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a)))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a)) (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))))) (/.f64 x-scale (/.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 a 4)) (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))))))) (.f64 a a)))) (.f64 a a)))) (pow.f64 b 6)) (fma.f64 1/2 (.f64 (pow.f64 b 4) (-.f64 (.f64 1/2 (/.f64 (.f64 (.f64 (.f64 x-scale y-scale) (-.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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a)))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a)) (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))))) (/.f64 x-scale (/.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 a 4)) (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))))))) (.f64 a a))))) (.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a)))))))
(fma.f64 1/2 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a)) (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))))) (/.f64 x-scale (/.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 a 4)) (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))))))) (fma.f64 1/2 (.f64 (-.f64 (.f64 -1/4 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) x-scale) (/.f64 (.f64 (.f64 (.f64 a a) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) 2)) (.f64 y-scale (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))))) (neg.f64 (/.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (.f64 (.f64 x-scale y-scale) (-.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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a)))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a)) (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))))) (/.f64 x-scale (/.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 a 4)) (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))))) (.f64 a a)))) (.f64 a a)))) (pow.f64 b 6)) (fma.f64 1/2 (.f64 (pow.f64 b 4) (-.f64 (.f64 1/2 (/.f64 (.f64 (.f64 (.f64 x-scale y-scale) (-.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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a)))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a)) (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))))) (/.f64 x-scale (/.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 a 4)) (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))))) (.f64 a a))))) (.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a)))))))
(.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(/.f64 (.f64 1/2 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 1/2 (+.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 b b))))
(.f64 1/2 (+.f64 (/.f64 (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 b b)) (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (/.f64 (.f64 y-scale (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (pow.f64 b 4))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) 2))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))))) (pow.f64 b 4)) (.f64 1/2 (+.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 b b)))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (+.f64 (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) 2)))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))))) (pow.f64 b 4)) (.f64 1/2 (+.f64 (/.f64 (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 b b)) (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (/.f64 (.f64 y-scale (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (pow.f64 b 4))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/4 (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (pow.f64 a 2) (-.f64 (.f64 -1/2 (.f64 (/.f64 (.f64 y-scale (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))))) (pow.f64 b 6))) (.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) 2))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))))) (pow.f64 b 4)) (fma.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 b b)) (.f64 1/2 (+.f64 (/.f64 (-.f64 (.f64 (.f64 1/4 (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (sqrt.f64 (/.f64 1 (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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) 2))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))))))) (pow.f64 b 6)) (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 (.f64 1/4 (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (+.f64 (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) 2))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (sqrt.f64 (/.f64 1 (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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (+.f64 (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) 2)))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))))))) (pow.f64 b 6)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (+.f64 (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) 2)))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))))) (pow.f64 b 4)) (.f64 1/2 (+.f64 (/.f64 (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 b b)) (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))))
(.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(/.f64 (.f64 1/2 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))))
(.f64 1/2 (+.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 b b))))
(.f64 1/2 (+.f64 (/.f64 (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 b b)) (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (/.f64 (.f64 y-scale (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (pow.f64 b 4)))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) 2))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))))) (pow.f64 b 4)) (.f64 1/2 (+.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 b b)))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (+.f64 (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) 2)))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))))) (pow.f64 b 4)) (.f64 1/2 (+.f64 (/.f64 (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 b b)) (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/4 (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.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)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (pow.f64 a 2) (-.f64 (.f64 -1/2 (.f64 (/.f64 (.f64 y-scale (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))))) (pow.f64 b 6))) (+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (/.f64 (.f64 y-scale (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 y-scale (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (pow.f64 b 4))))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) 2))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))))) (pow.f64 b 4)) (fma.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 b b)) (.f64 1/2 (+.f64 (/.f64 (-.f64 (.f64 (.f64 1/4 (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (sqrt.f64 (/.f64 1 (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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) 2))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))))))) (pow.f64 b 6)) (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 (.f64 1/4 (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (+.f64 (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) 2))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (sqrt.f64 (/.f64 1 (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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (+.f64 (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) 2)))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))))))) (pow.f64 b 6)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 y-scale (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (+.f64 (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) 2)))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))))) (pow.f64 b 4)) (.f64 1/2 (+.f64 (/.f64 (-.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (.f64 x-scale (.f64 a a)) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 b b)) (/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))))
(.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 -1/2 (.f64 (.f64 x-scale y-scale) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a)))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1/4 (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale 3) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 y-scale (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -1/4 (/.f64 (.f64 (.f64 x-scale (pow.f64 y-scale 3)) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))) 2))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 y-scale (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -1/4 (/.f64 (.f64 (.f64 x-scale (pow.f64 y-scale 3)) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) 2))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))))))
(+.f64 (.f64 1/8 (/.f64 (.f64 x-scale (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (pow.f64 y-scale 5) (+.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 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.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 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1/4 (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale 3) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(fma.f64 1/8 (/.f64 x-scale (/.f64 (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))) 2)) (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (pow.f64 y-scale 5))))) (fma.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 y-scale (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -1/4 (/.f64 (.f64 (.f64 x-scale (pow.f64 y-scale 3)) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))) 2))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a)))))))))
(fma.f64 1/8 (/.f64 x-scale (/.f64 (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))) 2)) (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (pow.f64 y-scale 5))))) (fma.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 y-scale (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -1/4 (/.f64 (.f64 (.f64 x-scale (pow.f64 y-scale 3)) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) 2))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a)))))))))
(+.f64 (.f64 1/8 (/.f64 (.f64 x-scale (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (pow.f64 y-scale 5) (+.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 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.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 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale 3) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 1/4 (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale 7) (+.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 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))))
(fma.f64 1/8 (/.f64 x-scale (/.f64 (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))) 2)) (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (pow.f64 y-scale 5))))) (fma.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 y-scale (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 -1/4 (/.f64 (.f64 (.f64 x-scale (pow.f64 y-scale 3)) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))) 2))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 1/4 (/.f64 x-scale (/.f64 (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (pow.f64 y-scale 7) (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))) 2)) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))) 2) (.f64 -1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) 2)) (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))) 2))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a))) 2))))))))))))
(fma.f64 1/8 (/.f64 x-scale (/.f64 (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))) 2)) (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (pow.f64 y-scale 5))))) (fma.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 y-scale (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 -1/4 (/.f64 (.f64 (.f64 x-scale (pow.f64 y-scale 3)) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) 2))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 1/4 (/.f64 x-scale (/.f64 (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (pow.f64 y-scale 7) (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))) 2)) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))) 2) (.f64 -1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) 2)) (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) 2))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a))) 2))))))))))))
(.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 -1/2 (.f64 x-scale (.f64 y-scale (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 -1/2 (/.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 y-scale (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a)))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 y-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 y-scale (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 1/2 (.f64 (/.f64 x-scale y-scale) (/.f64 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))))))
(fma.f64 -1/2 (/.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 y-scale (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (.f64 1/2 x-scale) (/.f64 (.f64 y-scale (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 x-scale (-.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 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 y-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 y-scale (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 -1/4 (.f64 (/.f64 x-scale (pow.f64 y-scale 3)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 1/2 (.f64 (/.f64 x-scale y-scale) (/.f64 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))))))
(fma.f64 -1/2 (/.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 y-scale (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 -1/4 (.f64 (/.f64 x-scale (pow.f64 y-scale 3)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))))) (/.f64 (.f64 1/2 x-scale) (/.f64 (.f64 y-scale (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 x-scale (-.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 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 y-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 1/8 (/.f64 (.f64 x-scale (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 5) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 y-scale (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 -1/4 (.f64 (/.f64 x-scale (pow.f64 y-scale 3)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 1/2 (.f64 (/.f64 x-scale y-scale) (/.f64 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (.f64 1/8 (.f64 (.f64 x-scale (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 y-scale 5)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))))))
(fma.f64 -1/2 (/.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 y-scale (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 -1/4 (.f64 (/.f64 x-scale (pow.f64 y-scale 3)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 1/2 (.f64 (/.f64 x-scale y-scale) (/.f64 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (.f64 1/8 (.f64 (.f64 x-scale (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 y-scale 5)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))))))
(.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 -1/2 (.f64 x-scale (.f64 y-scale (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 -1/2 (/.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 y-scale (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a)))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 y-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 y-scale (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 1/2 (.f64 (/.f64 x-scale y-scale) (/.f64 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))))))
(fma.f64 -1/2 (/.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 y-scale (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (.f64 1/2 x-scale) (/.f64 (.f64 y-scale (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 x-scale (-.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 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 y-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 y-scale (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 -1/4 (.f64 (/.f64 x-scale (pow.f64 y-scale 3)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 1/2 (.f64 (/.f64 x-scale y-scale) (/.f64 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))))))
(fma.f64 -1/2 (/.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 y-scale (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 -1/4 (.f64 (/.f64 x-scale (pow.f64 y-scale 3)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))))) (/.f64 (.f64 1/2 x-scale) (/.f64 (.f64 y-scale (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 x-scale (-.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 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 y-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 1/8 (/.f64 (.f64 x-scale (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 5) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 y-scale (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 -1/4 (.f64 (/.f64 x-scale (pow.f64 y-scale 3)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 1/2 (.f64 (/.f64 x-scale y-scale) (/.f64 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (.f64 1/8 (.f64 (.f64 x-scale (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 y-scale 5)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))))))
(fma.f64 -1/2 (/.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 y-scale (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 -1/4 (.f64 (/.f64 x-scale (pow.f64 y-scale 3)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 1/2 (.f64 (/.f64 x-scale y-scale) (/.f64 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (.f64 1/8 (.f64 (.f64 x-scale (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 y-scale 5)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(/.f64 (.f64 -1/2 y-scale) (/.f64 (.f64 x-scale (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 y-scale (.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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)))))) x-scale)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(fma.f64 1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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)))))) (fma.f64 (.f64 b b) (pow.f64 (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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(fma.f64 1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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)))))) (fma.f64 (.f64 b b) (pow.f64 (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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (.f64 -1/2 y-scale) (/.f64 (.f64 x-scale (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 y-scale (.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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)))))) x-scale)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 3) (-.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(fma.f64 1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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)))))) (fma.f64 (.f64 b b) (pow.f64 (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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 -1/4 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (pow.f64 x-scale 3) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 (.f64 b b) (pow.f64 (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))))) 2))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 (.f64 b b) (pow.f64 (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 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))))))
(fma.f64 1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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)))))) (fma.f64 (.f64 b b) (pow.f64 (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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 -1/4 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (pow.f64 x-scale 3) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (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)))) 2))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 (.f64 b b) (pow.f64 (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 (.f64 -1/2 y-scale) (/.f64 (.f64 x-scale (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))))
(+.f64 (.f64 1/8 (/.f64 (.f64 (pow.f64 x-scale 5) (.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 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) y-scale))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 1/2 (/.f64 (.f64 y-scale (.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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)))))) x-scale)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 3) (-.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))))
(fma.f64 1/8 (.f64 (/.f64 (pow.f64 x-scale 5) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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)))))) (fma.f64 (.f64 b b) (pow.f64 (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))))) 2)) (.f64 y-scale (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 2)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (fma.f64 1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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)))))) (fma.f64 (.f64 b b) (pow.f64 (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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 -1/4 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (pow.f64 x-scale 3) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 (.f64 b b) (pow.f64 (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))))) 2))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 (.f64 b b) (pow.f64 (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 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (*.f64 a a)))))))))
(fma.f64 1/8 (.f64 (/.f64 (pow.f64 x-scale 5) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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)))))) (fma.f64 (.f64 b b) (pow.f64 (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))))) 2)) (.f64 y-scale (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 2)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (fma.f64 1/2 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 x-scale (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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)))))) (fma.f64 (.f64 b b) (pow.f64 (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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 -1/4 (.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (pow.f64 x-scale 3) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (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)))) 2))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 (.f64 b b) (pow.f64 (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 (.f64 -1/2 y-scale) (/.f64 (.f64 x-scale (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1/4 (/.f64 (.f64 y-scale (-.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 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(fma.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -1/4 (.f64 (/.f64 y-scale (pow.f64 x-scale 3)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))))))
(fma.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (.f64 -1/4 y-scale) (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 1/8 (/.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)) (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 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 5) (.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))) 3) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -1/4 (/.f64 (.f64 y-scale (-.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 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))))
(fma.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 1/8 (.f64 (/.f64 y-scale (pow.f64 x-scale 5)) (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2))) (.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 3)))) (.f64 -1/4 (.f64 (/.f64 y-scale (pow.f64 x-scale 3)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))))))))
(fma.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 1/8 (.f64 (/.f64 y-scale (pow.f64 x-scale 5)) (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) 2))) (.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 3)))) (/.f64 (.f64 -1/4 y-scale) (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2))))))
(+.f64 (.f64 1/4 (/.f64 (.f64 y-scale (+.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 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 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 (cos.f64 (.f64 1/180 (.f64 angle (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))) 4))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2))) (.f64 (pow.f64 x-scale 7) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 1/8 (/.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)) (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 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 5) (.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))) 3) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -1/4 (/.f64 (.f64 y-scale (-.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 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))))
(fma.f64 1/4 (.f64 (/.f64 y-scale (pow.f64 x-scale 7)) (/.f64 (fma.f64 -1/4 (/.f64 (.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 4)) (pow.f64 (/.f64 (.f64 1/2 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 1/8 (.f64 (/.f64 y-scale (pow.f64 x-scale 5)) (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2))) (.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 3)))) (.f64 -1/4 (.f64 (/.f64 y-scale (pow.f64 x-scale 3)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))))))))
(fma.f64 1/4 (.f64 (/.f64 y-scale (pow.f64 x-scale 7)) (/.f64 (fma.f64 -1/4 (/.f64 (.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 4)) (pow.f64 (/.f64 (.f64 1/2 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 1/8 (.f64 (/.f64 y-scale (pow.f64 x-scale 5)) (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) 2))) (.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 3)))) (/.f64 (.f64 -1/4 y-scale) (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1/4 (/.f64 (.f64 y-scale (-.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 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(fma.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -1/4 (.f64 (/.f64 y-scale (pow.f64 x-scale 3)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))))))
(fma.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (.f64 -1/4 y-scale) (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 1/8 (/.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)) (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 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 5) (.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))) 3) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -1/4 (/.f64 (.f64 y-scale (-.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 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))))
(fma.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 1/8 (.f64 (/.f64 y-scale (pow.f64 x-scale 5)) (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2))) (.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 3)))) (.f64 -1/4 (.f64 (/.f64 y-scale (pow.f64 x-scale 3)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))))))))
(fma.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 1/8 (.f64 (/.f64 y-scale (pow.f64 x-scale 5)) (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) 2))) (.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 3)))) (/.f64 (.f64 -1/4 y-scale) (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2))))))
(+.f64 (.f64 1/4 (/.f64 (.f64 y-scale (+.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 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 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 (cos.f64 (.f64 1/180 (.f64 angle (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))) 4))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2))) (.f64 (pow.f64 x-scale 7) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 1/8 (/.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)) (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 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 5) (.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))) 3) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -1/4 (/.f64 (.f64 y-scale (-.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 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))))
(fma.f64 1/4 (.f64 (/.f64 y-scale (pow.f64 x-scale 7)) (/.f64 (fma.f64 -1/4 (/.f64 (.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 4)) (pow.f64 (/.f64 (.f64 1/2 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 1/8 (.f64 (/.f64 y-scale (pow.f64 x-scale 5)) (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2))) (.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 3)))) (.f64 -1/4 (.f64 (/.f64 y-scale (pow.f64 x-scale 3)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))))))))
(fma.f64 1/4 (.f64 (/.f64 y-scale (pow.f64 x-scale 7)) (/.f64 (fma.f64 -1/4 (/.f64 (.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 4)) (pow.f64 (/.f64 (.f64 1/2 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 1/8 (.f64 (/.f64 y-scale (pow.f64 x-scale 5)) (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) 2))) (.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 3)))) (/.f64 (.f64 -1/4 y-scale) (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) 2)))))))
(-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 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))))
(-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale 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 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))))))) (+.f64 (/.f64 (.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale)))))))))
(-.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 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)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))))))) (+.f64 (/.f64 (.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 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 (fma.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2)))) (.f64 (pow.f64 a 4) (-.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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2))))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))))))))
(-.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 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)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))))) (.f64 1/4 (.f64 (/.f64 (.f64 (pow.f64 a 6) (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))))) (+.f64 (/.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 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 (fma.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2)))) (.f64 (pow.f64 a 4) (-.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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2)))))) (.f64 1/4 (/.f64 (.f64 (.f64 (pow.f64 a 6) (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (-.f64 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2))))) 2)))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2))))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale)))))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))))
(-.f64 (fma.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2)))) (.f64 (pow.f64 a 4) (-.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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))))) 2)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2)))))) (.f64 (/.f64 (.f64 1/4 (pow.f64 a 6)) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale))))) (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (-.f64 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2))))) 2))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2)))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (*.f64 x-scale x-scale))))))))
(.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 -1/2 (.f64 (/.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)) (pow.f64 a 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))) (+.f64 (/.f64 (.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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (fma.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2)) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))) 2)) (.f64 a a))))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(+.f64 (fma.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2)) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))) 2)) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(-.f64 (+.f64 (.f64 1/4 (.f64 (/.f64 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) 2))) (.f64 (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 (/.f64 (.f64 (pow.f64 b 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 -1/2 (.f64 (/.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)) (pow.f64 a 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (+.f64 (/.f64 (.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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))
(-.f64 (fma.f64 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (pow.f64 a 4)) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale)))) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))) 2))) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2)) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))) 2)) (.f64 a a))))))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))
(.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 -1/2 (.f64 (/.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)) (pow.f64 a 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))) (+.f64 (/.f64 (.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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (fma.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2)) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))) 2)) (.f64 a a))))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(+.f64 (fma.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2)) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))) 2)) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(-.f64 (+.f64 (.f64 1/4 (.f64 (/.f64 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) 2))) (.f64 (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 (/.f64 (.f64 (pow.f64 b 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 -1/2 (.f64 (/.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)) (pow.f64 (.f64 1/2 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)) (pow.f64 a 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (+.f64 (/.f64 (.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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))
(-.f64 (fma.f64 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (pow.f64 a 4)) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 4)) (.f64 x-scale x-scale)))) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))) 2))) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2)) (pow.f64 (.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))) 2)) (.f64 a a))))))) (fma.f64 1/2 (.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))
(-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))
(.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (*.f64 x-scale x-scale))))
(-.f64 (+.f64 (.f64 2 (/.f64 (pow.f64 a 2) (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 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 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)))))))) (pow.f64 angle 2))) (*.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))
(+.f64 (fma.f64 2 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (-.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.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 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))))) (.f64 -2 (/.f64 (.f64 b b) (.f64 x-scale x-scale))))
(+.f64 (.f64 (.f64 angle angle) (-.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 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 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))) (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))
(-.f64 (+.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 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/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 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)))))))) (pow.f64 angle 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/2 (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 2/45 (/.f64 (.f64 (+.f64 (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale))) (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 y-scale x-scale))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 angle 4)))) (*.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))
(+.f64 (fma.f64 2 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (fma.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.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 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))) (.f64 angle angle) (.f64 (pow.f64 angle 4) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a)))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 2/45 (.f64 (/.f64 (.f64 (.f64 (/.f64 (-.f64 (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (/.f64 (.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 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-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 -2 (/.f64 (.f64 b b) (.f64 x-scale x-scale))))
(+.f64 (fma.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 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 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))) (.f64 angle angle) (.f64 (pow.f64 angle 4) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a)))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 2/45 (.f64 (/.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000) (/.f64 (.f64 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 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 (.f64 1/32400 (.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 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-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 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))
(-.f64 (+.f64 (.f64 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/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 (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 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (.f64 1/2 (/.f64 (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))))) (+.f64 (.f64 4 (pow.f64 (+.f64 (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale))) (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale)))) 2)) (.f64 2/45 (/.f64 (.f64 (+.f64 (.f64 1/22674816000000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (.f64 y-scale x-scale))) (+.f64 (.f64 1/4534963200000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (.f64 y-scale x-scale))) (.f64 1/2267481600000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (.f64 y-scale x-scale))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 y-scale x-scale)))))) (.f64 1/2 (/.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (.f64 2/45 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (+.f64 (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 x-scale y-scale))) (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 x-scale y-scale)))) (PI.f64))) (.f64 x-scale y-scale)))))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (+.f64 (.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 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)))))))) (pow.f64 angle 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/2 (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 2/45 (/.f64 (.f64 (+.f64 (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale))) (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 y-scale x-scale))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 angle 4))))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))
(+.f64 (fma.f64 2 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (fma.f64 (pow.f64 angle 6) (-.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 (+.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 1/2 (+.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))))) (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a)))))) (fma.f64 4 (pow.f64 (.f64 (.f64 (/.f64 (-.f64 (.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)) y-scale) (/.f64 (pow.f64 (PI.f64) 5) x-scale)) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (pow.f64 (PI.f64) 5) x-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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (+.f64 (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)) (.f64 2/45 (/.f64 (-.f64 (.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)))))) (fma.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.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 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))) (.f64 angle angle) (.f64 (pow.f64 angle 4) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a)))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 2/45 (.f64 (/.f64 (.f64 (.f64 (/.f64 (-.f64 (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (/.f64 (.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 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-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 -2 (/.f64 (.f64 b b) (.f64 x-scale x-scale))))
(+.f64 (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 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-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 a a) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))))) (/.f64 (.f64 1/2 (+.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))))) (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a)))))) (fma.f64 4 (pow.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000) (/.f64 (.f64 x-scale y-scale) (pow.f64 (PI.f64) 3))) 2) (.f64 2/45 (/.f64 (fma.f64 1/22674816000000 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (pow.f64 (PI.f64) 5) x-scale)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) 1/1511654400000) (/.f64 (.f64 x-scale y-scale) (pow.f64 (PI.f64) 5)))) (/.f64 (.f64 x-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))) (/.f64 (.f64 -1/2 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (+.f64 (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 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 (.f64 (/.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)) x-scale) 2/45) y-scale))) (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 (.f64 1/32400 (.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 (.f64 1/32400 (.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)))))) (fma.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 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 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))) (.f64 angle angle) (.f64 (pow.f64 angle 4) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a)))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 2/45 (.f64 (/.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000) (/.f64 (.f64 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 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 (.f64 1/32400 (.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 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-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 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))
(-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))
(-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))
(-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(-.f64 (fma.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (.f64 b b) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))))
(-.f64 (fma.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (.f64 b b) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))
(-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (+.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-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 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 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 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(-.f64 (fma.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (.f64 b b) (fma.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (.f64 (pow.f64 b 4) (-.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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) 2)))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale))))))))
(-.f64 (fma.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (.f64 b b) (fma.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (pow.f64 b 4) (-.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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) 2)))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale 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 (pow.f64 b 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)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (+.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-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 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 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 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(-.f64 (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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (/.f64 (.f64 (.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 b 6)) (-.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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (fma.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (.f64 b b) (fma.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (.f64 (pow.f64 b 4) (-.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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) 2)))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (/.f64 (.f64 (.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 b 6)) (-.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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (.f64 b b) (fma.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (pow.f64 b 4) (-.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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) 2)))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))))
(.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))))
(-.f64 (+.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(-.f64 (fma.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))
(-.f64 (fma.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))
(-.f64 (+.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 b 2)))) (+.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) 2)) (.f64 b b))) (fma.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))
(-.f64 (fma.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (+.f64 (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) 2))) (.f64 b b))) (fma.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))
(-.f64 (+.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 b 2)))) (+.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (+.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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) 2)) (.f64 b b))) (fma.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (fma.f64 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) 2)) (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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))) (/.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 b 4)))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))
(-.f64 (fma.f64 1/4 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (+.f64 (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) 2)))) (/.f64 (.f64 (pow.f64 b 4) (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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))) (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (fma.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (+.f64 (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) 2))) (.f64 b b))) (fma.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))
(.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale))))
(-.f64 (+.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))
(-.f64 (fma.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))
(-.f64 (fma.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))
(-.f64 (+.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.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 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (pow.f64 b 2)))))) (+.f64 (/.f64 (.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 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) 2)) (.f64 b b))) (fma.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))
(-.f64 (fma.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (+.f64 (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) 2))) (.f64 b b))) (fma.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))
(-.f64 (+.f64 (.f64 1/4 (.f64 (/.f64 (.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.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 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (pow.f64 b 2))))))) (+.f64 (/.f64 (.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 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) 2)) (.f64 b b))) (fma.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (fma.f64 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) 2)) (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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))) (/.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 b 4)))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))
(-.f64 (fma.f64 1/4 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (+.f64 (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) 2)))) (/.f64 (.f64 (pow.f64 b 4) (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) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))) (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (fma.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (+.f64 (/.f64 (.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) 2))) (.f64 b b))) (fma.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (fma.f64 1/2 (.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) -4) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))
(.f64 -1 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(neg.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (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 (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))))) (.f64 -1 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))
(fma.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))) 2)))) (neg.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))
(fma.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) 2)))) (neg.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (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 (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))))) (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)))) (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (.f64 -1 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))
(fma.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))) 2)))) (fma.f64 1/4 (/.f64 (.f64 (.f64 (pow.f64 y-scale 4) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))) 2))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) 2))) (neg.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))))
(fma.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) 2)))) (fma.f64 1/4 (/.f64 (.f64 (.f64 (pow.f64 y-scale 4) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))) 2))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) 2))) (neg.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (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 (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))))) (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)))) (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (+.f64 (.f64 -1 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 6) (+.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))))))))
(fma.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))) 2)))) (fma.f64 1/4 (/.f64 (.f64 (.f64 (pow.f64 y-scale 4) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))) 2))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) 2))) (fma.f64 -1 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (.f64 1/2 (/.f64 (pow.f64 y-scale 6) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))) 2)) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))) 2) (.f64 -1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) 2)) (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))) 2))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) 2)))) (fma.f64 1/4 (/.f64 (.f64 (.f64 (pow.f64 y-scale 4) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))) 2))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) 2))) (fma.f64 -1 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (/.f64 (.f64 1/2 (pow.f64 y-scale 6)) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))) 2)) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))) 2) (.f64 -1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) 2)) (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) 2))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a))) 2))))))))))
(.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(neg.f64 (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.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 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (+.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (neg.f64 (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))
(+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (neg.f64 (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.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 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/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 4) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (+.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 y-scale 4)))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 y-scale 4))))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))))
(-.f64 (+.f64 (.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 (pow.f64 y-scale 6) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.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 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/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 4) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (fma.f64 1/4 (.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (pow.f64 y-scale 6)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2)))) (+.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 y-scale 4))))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))))
(+.f64 (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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (pow.f64 y-scale 6)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 y-scale 4))))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))))
(.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(neg.f64 (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.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 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (+.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (neg.f64 (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))
(+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (neg.f64 (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.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 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/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 4) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (+.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 y-scale 4)))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 y-scale 4))))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))))
(-.f64 (+.f64 (.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 (pow.f64 y-scale 6) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.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 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/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 4) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (fma.f64 1/4 (.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (pow.f64 y-scale 6)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2)))) (+.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 y-scale 4))))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))))
(+.f64 (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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (pow.f64 y-scale 6)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 y-scale 4))))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (-.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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))))
(.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 x-scale x-scale)))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 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 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 x-scale x-scale)))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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)))))) (fma.f64 (.f64 b b) (pow.f64 (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 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (+.f64 (neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 x-scale x-scale))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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)))))) (fma.f64 (.f64 b b) (pow.f64 (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 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))))) (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (pow.f64 x-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 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 -1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (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 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 (.f64 b b) (pow.f64 (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))))) 2)))) (neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 x-scale x-scale))))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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)))))) (fma.f64 (.f64 b b) (pow.f64 (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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (fma.f64 -1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (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 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (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)))) 2)))) (neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 x-scale x-scale)))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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)))))) (fma.f64 (.f64 b b) (pow.f64 (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 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))))) (+.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 x-scale 4) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)))) (.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (pow.f64 x-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 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 -1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (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 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 (.f64 b b) (pow.f64 (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))))) 2)))) (fma.f64 1/4 (/.f64 (.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) (pow.f64 x-scale 4)) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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)))))) (fma.f64 (.f64 b b) (pow.f64 (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))))) 2))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 2))) (neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 x-scale x-scale)))))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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)))))) (fma.f64 (.f64 b b) (pow.f64 (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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (+.f64 (fma.f64 -1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (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 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (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)))) 2)))) (fma.f64 1/4 (/.f64 (.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) (pow.f64 x-scale 4)) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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)))))) (fma.f64 (.f64 b b) (pow.f64 (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))))) 2))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 2))) (neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 x-scale x-scale))))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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)))))) (fma.f64 (.f64 b b) (pow.f64 (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 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (*.f64 x-scale x-scale)))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 x-scale 2))))
(fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 x-scale 4))) (neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (.f64 x-scale x-scale))))
(fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 x-scale 4))) (neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (.f64 x-scale x-scale))))
(+.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))) (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3)))) (+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 x-scale 2)))))
(fma.f64 1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) (pow.f64 x-scale 6)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 3))) (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 x-scale 4))) (neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (.f64 x-scale x-scale)))))
(fma.f64 1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) (pow.f64 x-scale 6)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 3))) (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 x-scale 4))) (neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (.f64 x-scale x-scale)))))
(+.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))) (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3)))) (+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 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 (pow.f64 x-scale 8) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 x-scale 2))))))
(fma.f64 1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) (pow.f64 x-scale 6)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 3))) (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 x-scale 4))) (fma.f64 1/2 (/.f64 (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2) (.f64 -1/4 (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 4)))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 x-scale 8))) (neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (*.f64 x-scale x-scale))))))
(fma.f64 1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) (pow.f64 x-scale 6)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 3))) (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 x-scale 4))) (fma.f64 1/2 (/.f64 (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2) (.f64 -1/4 (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 4)))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 x-scale 8))) (neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (*.f64 x-scale x-scale))))))
(.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (*.f64 x-scale x-scale)))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 x-scale 2))))
(fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 x-scale 4))) (neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (.f64 x-scale x-scale))))
(fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 x-scale 4))) (neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (.f64 x-scale x-scale))))
(+.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))) (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3)))) (+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 x-scale 2)))))
(fma.f64 1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) (pow.f64 x-scale 6)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 3))) (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 x-scale 4))) (neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (.f64 x-scale x-scale)))))
(fma.f64 1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) (pow.f64 x-scale 6)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 3))) (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 x-scale 4))) (neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (.f64 x-scale x-scale)))))
(+.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))) (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3)))) (+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 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 (pow.f64 x-scale 8) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 x-scale 2))))))
(fma.f64 1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) (pow.f64 x-scale 6)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 3))) (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 x-scale 4))) (fma.f64 1/2 (/.f64 (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2) (.f64 -1/4 (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 4)))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 x-scale 8))) (neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (*.f64 x-scale x-scale))))))
(fma.f64 1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) (pow.f64 x-scale 6)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 3))) (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 x-scale 4))) (fma.f64 1/2 (/.f64 (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 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 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2) (.f64 -1/4 (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (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))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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)))))) 1/2) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) 4)))) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 x-scale 8))) (neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (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 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.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 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (*.f64 x-scale x-scale))))))
(.f64 1 (sin.f64 (.f64 (*.f64 angle 1/180) (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(.f64 (sqrt.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (sqrt.f64 (sin.f64 (.f64 (*.f64 angle 1/180) (PI.f64)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(.f64 (.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (cbrt.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))))) (cbrt.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 1)
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(log.f64 (exp.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cbrt.f64 (.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(cbrt.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))
(expm1.f64 (log1p.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(exp.f64 (log.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(log1p.f64 (expm1.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(.f64 1 (cos.f64 (.f64 (*.f64 angle 1/180) (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(.f64 (sqrt.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (sqrt.f64 (cos.f64 (.f64 (*.f64 angle 1/180) (PI.f64)))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(.f64 (.f64 (cbrt.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (cbrt.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))))) (cbrt.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 1)
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(log.f64 (exp.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cbrt.f64 (.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))
(expm1.f64 (log1p.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(exp.f64 (log.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(log1p.f64 (expm1.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(-.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale))) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale))))
(-.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale))) (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale))) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))) (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) x-scale))))
(.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 1 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (*.f64 y-scale x-scale))))
(/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2)))) (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)))
(.f64 1 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a))))) x-scale)) y-scale))
(/.f64 (.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2)))) y-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))))
(.f64 (sqrt.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale)) (sqrt.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a))))) x-scale)) y-scale)))
(/.f64 (.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2)))) y-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))))
(.f64 (.f64 (cbrt.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale)) (cbrt.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale))) (cbrt.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale)))
(/.f64 (.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2)))) y-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))))
(.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale)
(/.f64 (.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2)))) y-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))))
(pow.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale) 1)
(/.f64 (.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2)))) y-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))))
(log.f64 (exp.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale)))
(/.f64 (.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2)))) y-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))))
(cbrt.f64 (.f64 (.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale) (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale)) (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale)))
(cbrt.f64 (.f64 (/.f64 (.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2)))) y-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 (.f64 (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))) x-scale) (.f64 y-scale (/.f64 (.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2)))) y-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))))))))
(expm1.f64 (log1p.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale)))
(/.f64 (.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2)))) y-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))))
(exp.f64 (log.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale)))
(/.f64 (.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2)))) y-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))))
(log1p.f64 (expm1.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) x-scale)) y-scale)))
(/.f64 (.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2)))) y-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))))
(+.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2)))))
(-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) x-scale)) 2))))
(.f64 1 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (*.f64 y-scale x-scale)) 2))))))
(-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) x-scale)) 2))))
(.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2)))))) (sqrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (*.f64 y-scale x-scale)) 2)))))))
(-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) x-scale)) 2))))
(.f64 (.f64 (cbrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2)))))) (cbrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))))) (cbrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2)))))))
(-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) x-scale)) 2))))
(/.f64 (-.f64 (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)))) (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))) (+.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (*.f64 y-scale x-scale)) 2)))))
(/.f64 (-.f64 (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale)))) (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))) (+.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) x-scale)) 2)))))
(/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) 3) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))) 3)) (+.f64 (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)))) (+.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2)) (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2)))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale))) 3) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))) 3)) (fma.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale))) 2) (+.f64 (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2) (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2))))))))
(pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) 1)
(-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) x-scale)) 2))))
(log.f64 (exp.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2)))))))
(-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) x-scale)) 2))))
(cbrt.f64 (.f64 (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2))))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2)))))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2)))))))
(cbrt.f64 (.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2)))) (.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale)) 2)))) (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) x-scale)) 2)))))))
(expm1.f64 (log1p.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2)))))))
(-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) x-scale)) 2))))
(exp.f64 (log.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2)))))))
(-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) x-scale)) 2))))
(log1p.f64 (expm1.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale x-scale)) 2)))))))
(-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) x-scale)) 2))))

localize427.0ms (0.3%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	66.8%	(-.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 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 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 (.f64 (/.f64 (-.f64 b a) (/.f64 y-scale (+.f64 a b))) 2) (/.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) x-scale)))))
	61.7%	(cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))
	61.6%	(sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))
✓	59.3%	(/.f64 (-.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 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 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 (.f64 (/.f64 (-.f64 b a) (/.f64 y-scale (+.f64 a b))) 2) (/.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) x-scale))))) (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))))

Compiler

Compiled 1314 to 778 computations (40.8% saved)

series177.0ms (0.1%)

Counts

2 → 120

Calls

30 calls:

Time	Variable		Point	Expression
16.0ms	angle	@	0	(/.f64 (-.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 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 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 (.f64 (/.f64 (-.f64 b a) (/.f64 y-scale (+.f64 a b))) 2) (/.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) x-scale))))) (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))))
12.0ms	a	@	0	(/.f64 (-.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 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 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 (.f64 (/.f64 (-.f64 b a) (/.f64 y-scale (+.f64 a b))) 2) (/.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) x-scale))))) (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))))
12.0ms	y-scale	@	0	(/.f64 (-.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 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 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 (.f64 (/.f64 (-.f64 b a) (/.f64 y-scale (+.f64 a b))) 2) (/.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) x-scale))))) (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))))
10.0ms	a	@	inf	(/.f64 (-.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 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 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 (.f64 (/.f64 (-.f64 b a) (/.f64 y-scale (+.f64 a b))) 2) (/.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) x-scale))))) (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))))
10.0ms	x-scale	@	inf	(/.f64 (-.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 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 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 (.f64 (/.f64 (-.f64 b a) (/.f64 y-scale (+.f64 a b))) 2) (/.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) x-scale))))) (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))))))

rewrite96.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

1252×	`add-sqr-sqrt`
1234×	`*-un-lft-identity`
1156×	`add-exp-log`
1156×	`add-log-exp`
1154×	`add-cbrt-cube`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	50	926
1	1196	926

Stop Event

1×	node limit

Counts

2 → 23

Calls

Call 1

Inputs

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

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

Outputs

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

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

simplify1.4s (0.9%)

Algorithm

1×	egg-herbie

Rules

1548×	`associate-*r/`
1312×	`+-commutative`
1178×	`*-commutative`
620×	`associate-+l+`
616×	`associate-+r+`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	1391	202661
1	5757	202655

Stop Event

1×	node limit

Counts

143 → 266

Calls

Call 1

Inputs
(.f64 1/2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (.f64 -2 (.f64 (/.f64 (.f64 a (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale))))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (.f64 1/2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (.f64 -2 (.f64 (/.f64 (.f64 a (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale))))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 1/2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2)) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (.f64 4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 4) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 a 3) (-.f64 (.f64 -1/2 (.f64 (/.f64 (.f64 x-scale (-.f64 (.f64 -8 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))))) (.f64 x-scale y-scale))) (.f64 4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.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 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 4 (pow.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2))))) (pow.f64 (.f64 4 (.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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))))))))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.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 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) (.f64 4 (.f64 (/.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 y-scale (pow.f64 b 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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))))) (+.f64 (.f64 -2 (.f64 (/.f64 (.f64 a (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale))))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 1/2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2)) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (.f64 4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 4) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))))
(.f64 -1/2 (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(+.f64 (.f64 -2 (.f64 (/.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 y-scale a)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 x-scale (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))) (+.f64 (.f64 -2 (.f64 (/.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 y-scale a)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale (-.f64 (.f64 8 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale))) (.f64 -4 (.f64 (/.f64 (.f64 (-.f64 (+.f64 (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2)) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (.f64 4 (.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale))))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 a 3))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 x-scale (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))) (+.f64 (.f64 -2 (.f64 (/.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 y-scale a)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(.f64 -1/2 (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(+.f64 (.f64 2 (.f64 (/.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 y-scale a)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 x-scale (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))) (+.f64 (.f64 2 (.f64 (/.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 y-scale a)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 x-scale (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))) (+.f64 (.f64 -1/2 (/.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale (-.f64 (.f64 8 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale))) (.f64 -4 (.f64 (/.f64 (.f64 (-.f64 (+.f64 (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2)) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (.f64 4 (.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale))))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 a 3))) (+.f64 (.f64 2 (.f64 (/.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 y-scale a)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(.f64 90 (/.f64 (.f64 x-scale (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))
(+.f64 (.f64 1/2 (.f64 angle (-.f64 (.f64 180 (/.f64 (.f64 x-scale (-.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (.f64 x-scale (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2))))))) (.f64 90 (/.f64 (.f64 x-scale (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))
(+.f64 (.f64 1/2 (.f64 angle (-.f64 (.f64 180 (/.f64 (.f64 x-scale (-.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (.f64 x-scale (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2))))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (.f64 x-scale (-.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/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 (.f64 1/45 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (+.f64 a b) (.f64 (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (.f64 -1/11664000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (PI.f64)))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 1/45 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (.f64 -1/11664000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (.f64 (PI.f64) (+.f64 a b)))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 180 (/.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/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) x-scale) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 x-scale (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 x-scale (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))))) (.f64 90 (/.f64 (.f64 x-scale (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (/.f64 (.f64 x-scale (-.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 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (/.f64 (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (/.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (.f64 -1/11664000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) 2)) (.f64 (pow.f64 y-scale 2) (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 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 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 2/45 (/.f64 (.f64 (+.f64 (.f64 1/2267481600000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/4534963200000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 5))) (.f64 1/22674816000000 (.f64 (pow.f64 (PI.f64) 5) (+.f64 a b))))) (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (+.f64 a b) (PI.f64)))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (.f64 1/2 (/.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (.f64 1/45 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (.f64 -1/11664000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (.f64 (+.f64 a b) (PI.f64)))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (.f64 1/45 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (+.f64 a b) (.f64 (PI.f64) (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (.f64 -1/11664000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 3))))))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 32400 (/.f64 (.f64 (+.f64 (.f64 -1/1469328076800000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7))) (+.f64 (.f64 -1/30855889612800000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7))) (+.f64 (.f64 -1/881596846080000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7))) (.f64 -1/4407984230400000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7)))))) (.f64 x-scale (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))) (+.f64 (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.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/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) x-scale) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 x-scale (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2))))) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 180 (/.f64 (.f64 x-scale (-.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/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 (.f64 1/45 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (.f64 -1/11664000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (.f64 (+.f64 a b) (PI.f64)))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (.f64 1/45 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (+.f64 a b) (.f64 (PI.f64) (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (.f64 -1/11664000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 3))))))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 32400 (/.f64 (.f64 (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))))) (.f64 x-scale (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))) (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 180 (/.f64 (.f64 x-scale (-.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (.f64 x-scale (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))))) (+.f64 (.f64 1/2 (.f64 angle (-.f64 (.f64 180 (/.f64 (.f64 x-scale (-.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (.f64 x-scale (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2))))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (.f64 x-scale (-.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/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 (.f64 1/45 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (+.f64 a b) (.f64 (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (.f64 -1/11664000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (PI.f64)))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 1/45 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (.f64 -1/11664000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (.f64 (PI.f64) (+.f64 a b)))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 180 (/.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/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) x-scale) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 x-scale (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 x-scale (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))))) (.f64 90 (/.f64 (.f64 x-scale (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))))
(.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 -1/2 (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) b) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -2 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) b) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (.f64 1/2 (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2)) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2)))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -2 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) b) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (+.f64 (.f64 1/2 (.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale (-.f64 (.f64 8 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale))) (.f64 -4 (.f64 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2)))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (pow.f64 a 2) (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) 2)) (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (.f64 4 (.f64 (/.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 y-scale (pow.f64 a 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 x-scale 2) (pow.f64 y-scale 2)))))))))) (pow.f64 b 3))) (.f64 1/2 (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2)) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))))))
(.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (.f64 (/.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 y-scale b)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (/.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2)) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (pow.f64 (.f64 4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 x-scale (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (.f64 (/.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 y-scale b)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (/.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2)) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (pow.f64 (.f64 4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 x-scale (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 -2 (.f64 (/.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 y-scale b)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 -1/2 (.f64 (/.f64 (.f64 x-scale (-.f64 (.f64 -8 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale))) (.f64 4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (-.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2))))) (pow.f64 (.f64 4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (.f64 4 (.f64 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale))))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))) (pow.f64 b 3))))))
(.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (.f64 (/.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 y-scale b)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2)) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 x-scale (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (.f64 -2 (.f64 (/.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 y-scale b)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 -1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (/.f64 (.f64 x-scale (-.f64 (.f64 8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 x-scale y-scale))) (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2)))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (pow.f64 a 2)) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))) (pow.f64 b 3))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2)) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 x-scale (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (.f64 -2 (.f64 (/.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 y-scale b)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 x-scale (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 -1/4 (/.f64 (.f64 x-scale (.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (.f64 -1/4 (/.f64 (.f64 x-scale (.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/8 (/.f64 (.f64 x-scale (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)) (pow.f64 y-scale 4)))) (.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 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))))
(+.f64 (.f64 1/4 (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale 6) (+.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 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/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 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (.f64 (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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 x-scale (.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/8 (/.f64 (.f64 x-scale (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)) (pow.f64 y-scale 4)))) (.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 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))))
(.f64 -1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 y-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 x-scale (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 y-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 x-scale (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 y-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 1/8 (/.f64 (.f64 x-scale (.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 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))))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))))
(.f64 -1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 y-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 x-scale (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 y-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 x-scale (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 y-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 1/8 (/.f64 (.f64 x-scale (.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 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))))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))))
(.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (.f64 1/2 (.f64 x-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (pow.f64 b 2) (pow.f64 a 2)))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(+.f64 (.f64 1/2 (.f64 x-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (pow.f64 b 2) (pow.f64 a 2)))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)) (pow.f64 x-scale 3)) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(+.f64 (.f64 1/2 (.f64 x-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (pow.f64 b 2) (pow.f64 a 2)))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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/8 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 5) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)))) (.f64 (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 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)) (pow.f64 x-scale 3)) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))
(.f64 -1/2 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 1/8 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2))) (.f64 (pow.f64 x-scale 5) (.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))) 3) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 1/4 (/.f64 (+.f64 (.f64 -1/4 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)))) (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))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 7) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 1/8 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2))) (.f64 (pow.f64 x-scale 5) (.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))) 3) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))))
(.f64 -1/2 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 1/8 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2))) (.f64 (pow.f64 x-scale 5) (.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))) 3) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 1/4 (/.f64 (+.f64 (.f64 -1/4 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)))) (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))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 7) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 1/8 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2))) (.f64 (pow.f64 x-scale 5) (.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))) 3) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))))
(-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))
(-.f64 (+.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 a (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(-.f64 (+.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 a (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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 a 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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 4 (pow.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2))))) (pow.f64 (.f64 4 (.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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))))))))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(-.f64 (+.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 a (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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 a 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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 4 (pow.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2))))) (pow.f64 (.f64 4 (.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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))))))))) 2)))) (/.f64 (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 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 a 3) (-.f64 (.f64 -8 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale))) (.f64 4 (.f64 (/.f64 (.f64 (-.f64 (+.f64 (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2)) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (.f64 4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.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 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(+.f64 (.f64 4 (.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))
(-.f64 (+.f64 (.f64 4 (.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (pow.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2)) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(-.f64 (+.f64 (.f64 4 (.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (.f64 -1/2 (.f64 (/.f64 (-.f64 (.f64 8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale))))))) (.f64 x-scale y-scale))) (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 x-scale y-scale)) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))) a) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (pow.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2)) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(+.f64 (.f64 -4 (.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 -4 (.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (pow.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2)) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (.f64 -4 (.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 1/2 (.f64 (/.f64 (-.f64 (.f64 8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale))))))) (.f64 x-scale y-scale))) (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 x-scale y-scale)) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))) a) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2)) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))
(-.f64 (+.f64 (.f64 2 (/.f64 (pow.f64 a 2) (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 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (pow.f64 angle 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))
(-.f64 (+.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 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/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (pow.f64 angle 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/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 (.f64 1/45 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (.f64 -1/11664000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (.f64 (+.f64 a b) (PI.f64)))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (.f64 1/45 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (+.f64 a b) (.f64 (PI.f64) (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (.f64 -1/11664000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 3))))))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 angle 4)))) (*.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))
(-.f64 (+.f64 (.f64 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/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 (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 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 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (.f64 -1/11664000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 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 2/45 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (+.f64 (.f64 1/2267481600000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/4534963200000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 5))) (.f64 1/22674816000000 (.f64 (pow.f64 (PI.f64) 5) (+.f64 a b))))) (.f64 (PI.f64) (+.f64 a b)))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (.f64 1/2 (/.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (.f64 1/45 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (+.f64 a b) (.f64 (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (.f64 -1/11664000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (PI.f64)))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 1/45 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (.f64 -1/11664000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (.f64 (PI.f64) (+.f64 a b)))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (pow.f64 angle 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/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 (.f64 1/45 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (.f64 -1/11664000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (.f64 (+.f64 a b) (PI.f64)))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (.f64 1/45 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (+.f64 a b) (.f64 (PI.f64) (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (.f64 -1/11664000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 3))))))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 angle 4))))) (.f64 2 (/.f64 (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 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))
(-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(-.f64 (+.f64 (.f64 4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (pow.f64 a 2) (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2)))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (pow.f64 a 2) (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (+.f64 (.f64 4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (pow.f64 a 2) (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2)))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (pow.f64 a 2) (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (+.f64 (.f64 4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (pow.f64 a 2) (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (+.f64 (.f64 -1/2 (.f64 (.f64 (pow.f64 b 3) (-.f64 (.f64 8 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale))) (.f64 -4 (.f64 (/.f64 (.f64 (pow.f64 a 2) (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2)) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2))))) (pow.f64 (.f64 4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(-.f64 (+.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 x-scale y-scale))) (.f64 4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2)) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (pow.f64 (.f64 4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))) b))) (+.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2))))) (pow.f64 (.f64 4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2)))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(-.f64 (+.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.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 (.f64 8 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale))) (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2)) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))) b)))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2)))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (/.f64 (.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/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 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (.f64 -1 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 6) (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/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 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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) (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 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/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 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (.f64 -1 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))
(.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(-.f64 (+.f64 (.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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)))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(-.f64 (+.f64 (.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 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))))) 2)) (.f64 (pow.f64 y-scale 4) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 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 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(-.f64 (+.f64 (.f64 1/4 (/.f64 (.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 y-scale 6) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2))))) (+.f64 (.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 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))))) 2)) (.f64 (pow.f64 y-scale 4) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 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 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(-.f64 (+.f64 (.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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)))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(-.f64 (+.f64 (.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 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))))) 2)) (.f64 (pow.f64 y-scale 4) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 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 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(-.f64 (+.f64 (.f64 1/4 (/.f64 (.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 y-scale 6) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2))))) (+.f64 (.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 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))))) 2)) (.f64 (pow.f64 y-scale 4) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 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 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 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 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.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 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 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 -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 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.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 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 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 1/4 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)) (pow.f64 x-scale 4))) (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (.f64 -1/2 (/.f64 (.f64 (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 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(.f64 -1 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 x-scale 2)))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 -1 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (pow.f64 x-scale 2))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 1/4 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2))) (.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 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (pow.f64 x-scale 2)))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 1/4 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2))) (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3)))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -1/4 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)))) (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))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 8) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (pow.f64 x-scale 2))))))
(.f64 -1 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 x-scale 2)))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 -1 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (pow.f64 x-scale 2))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 1/4 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2))) (.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 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (pow.f64 x-scale 2)))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 1/4 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2))) (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3)))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -1/4 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)))) (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))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 8) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (pow.f64 x-scale 2))))))
(-.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) 2)))) (/.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) 2)))))
(.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (/.f64 1 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) 2)))))
(.f64 1 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) 2)))))
(.f64 (sqrt.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) 2))))) (sqrt.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale) 2))))))
(.f64 (.f64 (cbrt.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) 2))))) (cbrt.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) 2)))))) (cbrt.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale) 2))))))
(pow.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale) 2)))) 1)
(log.f64 (exp.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale) 2))))))
(cbrt.f64 (.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) 2)))) (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) 2))))) (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale) 2))))))
(expm1.f64 (log1p.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale) 2))))))
(exp.f64 (log.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale) 2))))))
(log1p.f64 (expm1.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale) 2))))))
(+.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (neg.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale)))))))
(.f64 1 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (*.f64 angle 1/180) (PI.f64))) x-scale))))))))
(.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale)))))))) (sqrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (*.f64 angle 1/180) (PI.f64))) x-scale)))))))))
(.f64 (.f64 (cbrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale)))))))) (cbrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))))) (cbrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale)))))))))
(/.f64 (-.f64 (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)))) (+.f64 (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)))) (.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale)))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (+.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (*.f64 angle 1/180) (PI.f64))) x-scale)))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) 3) (pow.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))) 3)) (+.f64 (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)))) (+.f64 (+.f64 (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)))) (.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale)))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale)))))) (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale)))))))))
(pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) 1)
(log.f64 (exp.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale)))))))))
(cbrt.f64 (.f64 (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale)))))))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale)))))))))
(expm1.f64 (log1p.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale)))))))))
(exp.f64 (log.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale)))))))))
(log1p.f64 (expm1.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale)))))))))

Outputs
(.f64 1/2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 1/2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 x-scale (.f64 (.f64 b b) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))
(.f64 1/2 (.f64 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 x-scale (.f64 (.f64 b b) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))
(+.f64 (.f64 -2 (.f64 (/.f64 (.f64 a (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale))))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (.f64 1/2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(fma.f64 -2 (.f64 (/.f64 (.f64 a (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (.f64 1/2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 x-scale (.f64 (.f64 b b) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))))
(fma.f64 -2 (.f64 (/.f64 (.f64 a (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (.f64 1/2 (.f64 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 x-scale (.f64 (.f64 b b) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))))
(+.f64 (.f64 -2 (.f64 (/.f64 (.f64 a (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale))))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 1/2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2)) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (.f64 4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 4) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))))
(fma.f64 -2 (.f64 (/.f64 (.f64 a (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (.f64 1/2 (+.f64 (.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 x-scale (.f64 (.f64 b b) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)))) (-.f64 (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) x-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 (.f64 b b) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)))) (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (pow.f64 b 4))))))))))
(fma.f64 -2 (.f64 (/.f64 (.f64 a (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (.f64 1/2 (+.f64 (.f64 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 x-scale (.f64 (.f64 b b) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) x-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 (.f64 b b) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)))) (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (pow.f64 b 4))))))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 a 3) (-.f64 (.f64 -1/2 (.f64 (/.f64 (.f64 x-scale (-.f64 (.f64 -8 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))))) (.f64 x-scale y-scale))) (.f64 4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.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 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 4 (pow.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2))))) (pow.f64 (.f64 4 (.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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))))))))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.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 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) (.f64 4 (.f64 (/.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 y-scale (pow.f64 b 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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))))))) (+.f64 (.f64 -2 (.f64 (/.f64 (.f64 a (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale))))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 1/2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2)) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (.f64 4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 4) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))))
(fma.f64 1/2 (.f64 (pow.f64 a 3) (+.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)))) (.f64 (/.f64 x-scale (.f64 b b)) (/.f64 (+.f64 (.f64 -8 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) y-scale))) (.f64 -4 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (.f64 b b) x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))))) y-scale))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) 2)) (.f64 (.f64 b b) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)))))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)))) (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 (.f64 b b) y-scale)))))) (fma.f64 -2 (.f64 (/.f64 (.f64 a (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (.f64 1/2 (+.f64 (.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 x-scale (.f64 (.f64 b b) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)))) (-.f64 (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) x-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 (.f64 b b) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)))) (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (pow.f64 b 4)))))))))))
(fma.f64 1/2 (.f64 (pow.f64 a 3) (+.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)))) (.f64 (/.f64 x-scale (.f64 b b)) (/.f64 (+.f64 (.f64 -8 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) y-scale))) (.f64 -4 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (.f64 b b) x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))))) y-scale))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) 2)) (.f64 (.f64 b b) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)))))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)))) (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 (.f64 b b) y-scale)))))) (fma.f64 -2 (.f64 (/.f64 (.f64 a (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) (.f64 1/2 (+.f64 (.f64 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 x-scale (.f64 (.f64 b b) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) x-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 (.f64 b b) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)))) (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (pow.f64 b 4)))))))))))
(.f64 -1/2 (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(+.f64 (.f64 -2 (.f64 (/.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 y-scale a)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(fma.f64 -2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 y-scale a)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))))
(fma.f64 -2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 y-scale a)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 x-scale (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))) (+.f64 (.f64 -2 (.f64 (/.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 y-scale a)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) y-scale)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 a a)) (fma.f64 -2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 y-scale a)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) y-scale)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 a a)) (fma.f64 -2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 y-scale a)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale (-.f64 (.f64 8 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale))) (.f64 -4 (.f64 (/.f64 (.f64 (-.f64 (+.f64 (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2)) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (.f64 4 (.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale))))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 a 3))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 x-scale (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))) (+.f64 (.f64 -2 (.f64 (/.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 y-scale a)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.f64 1/2 (/.f64 (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) x-scale)) 8) (.f64 4 (.f64 (/.f64 (-.f64 (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) y-scale)))) 2)) (/.f64 (.f64 y-scale x-scale) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))))))) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (.f64 b b) (/.f64 y-scale (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))))))) (pow.f64 a 3)) (fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) y-scale)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 a a)) (fma.f64 -2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 y-scale a)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))))))
(fma.f64 1/2 (/.f64 (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (+.f64 (/.f64 (.f64 8 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) (/.f64 (.f64 y-scale x-scale) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (.f64 4 (.f64 (/.f64 (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) y-scale)))) 2)) (/.f64 (.f64 y-scale x-scale) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))))))) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (.f64 b b) (/.f64 y-scale (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))))))) (pow.f64 a 3)) (fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) y-scale)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 a a)) (fma.f64 -2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 y-scale a)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))))))
(.f64 -1/2 (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(+.f64 (.f64 2 (.f64 (/.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 y-scale a)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(fma.f64 2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 y-scale a)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))))
(fma.f64 2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 y-scale a)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 x-scale (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))) (+.f64 (.f64 2 (.f64 (/.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 y-scale a)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) y-scale)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 a a)) (fma.f64 2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 y-scale a)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) y-scale)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 a a)) (fma.f64 2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 y-scale a)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 x-scale (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))) (+.f64 (.f64 -1/2 (/.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale (-.f64 (.f64 8 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale))) (.f64 -4 (.f64 (/.f64 (.f64 (-.f64 (+.f64 (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2)) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (.f64 4 (.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale))))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 a 3))) (+.f64 (.f64 2 (.f64 (/.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 y-scale a)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) y-scale)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 a a)) (fma.f64 -1/2 (/.f64 (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) x-scale)) 8) (.f64 4 (.f64 (/.f64 (-.f64 (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) y-scale)))) 2)) (/.f64 (.f64 y-scale x-scale) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))))))) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (.f64 b b) (/.f64 y-scale (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))))))) (pow.f64 a 3)) (fma.f64 2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 y-scale a)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) y-scale)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 a a)) (fma.f64 -1/2 (/.f64 (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (+.f64 (/.f64 (.f64 8 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) (/.f64 (.f64 y-scale x-scale) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (.f64 4 (.f64 (/.f64 (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) y-scale)))) 2)) (/.f64 (.f64 y-scale x-scale) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))))))) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (.f64 b b) (/.f64 y-scale (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))))))) (pow.f64 a 3)) (fma.f64 2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 y-scale a)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))))))
(.f64 90 (/.f64 (.f64 x-scale (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))
(.f64 90 (.f64 (/.f64 x-scale angle) (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))
(/.f64 (.f64 90 x-scale) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
(+.f64 (.f64 1/2 (.f64 angle (-.f64 (.f64 180 (/.f64 (.f64 x-scale (-.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (.f64 x-scale (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2))))))) (.f64 90 (/.f64 (.f64 x-scale (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))
(fma.f64 1/2 (.f64 angle (+.f64 (.f64 180 (.f64 (/.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 x-scale (PI.f64)))) (.f64 -32400 (/.f64 (.f64 (.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) x-scale) (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (.f64 90 (.f64 (/.f64 x-scale angle) (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))
(fma.f64 1/2 (.f64 angle (+.f64 (.f64 180 (.f64 (/.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 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 (.f64 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 x-scale (PI.f64)))) (.f64 -32400 (/.f64 (.f64 (.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) x-scale) (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (/.f64 (.f64 90 x-scale) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))
(+.f64 (.f64 1/2 (.f64 angle (-.f64 (.f64 180 (/.f64 (.f64 x-scale (-.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (.f64 x-scale (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2))))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (.f64 x-scale (-.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/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 (.f64 1/45 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (+.f64 a b) (.f64 (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (.f64 -1/11664000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (PI.f64)))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 1/45 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (.f64 -1/11664000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (.f64 (PI.f64) (+.f64 a b)))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 180 (/.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/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) x-scale) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 x-scale (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 x-scale (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))))) (.f64 90 (/.f64 (.f64 x-scale (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))
(fma.f64 1/2 (.f64 angle (+.f64 (.f64 180 (.f64 (/.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 x-scale (PI.f64)))) (.f64 -32400 (/.f64 (.f64 (.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) x-scale) (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (fma.f64 1/2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (-.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/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) 2) (.f64 1/45 (+.f64 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 (.f64 -1/11664000 (+.f64 b a)) (pow.f64 (PI.f64) 3))) (.f64 (PI.f64) (+.f64 b a))) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 (.f64 -1/11664000 (+.f64 b a)) (pow.f64 (PI.f64) 3))) (.f64 (PI.f64) (+.f64 b a))) (.f64 x-scale x-scale)))))))) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))) (PI.f64)))) (fma.f64 180 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (.f64 180 (.f64 (/.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 x-scale (PI.f64)))) (.f64 -32400 (.f64 (/.f64 x-scale (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000)) (pow.f64 (PI.f64) 2))))))) (/.f64 (.f64 32400 (.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (fma.f64 1/22674816000000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/1511654400000)))) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (.f64 90 (.f64 (/.f64 x-scale angle) (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
(fma.f64 1/2 (.f64 angle (+.f64 (.f64 180 (.f64 (/.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 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 (.f64 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 x-scale (PI.f64)))) (.f64 -32400 (/.f64 (.f64 (.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) x-scale) (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (fma.f64 1/2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (-.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/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) 2) (.f64 1/45 (+.f64 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 (.f64 -1/11664000 (+.f64 b a)) (pow.f64 (PI.f64) 3))) (.f64 (PI.f64) (+.f64 b a))) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 (.f64 -1/11664000 (+.f64 b a)) (pow.f64 (PI.f64) 3))) (.f64 (PI.f64) (+.f64 b a))) (.f64 x-scale x-scale)))))))) (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 (.f64 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))) (PI.f64)))) (fma.f64 180 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (.f64 180 (.f64 (/.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 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 (.f64 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 x-scale (PI.f64)))) (.f64 -32400 (.f64 (/.f64 x-scale (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000)) (pow.f64 (PI.f64) 2))))))) (.f64 32400 (.f64 (/.f64 x-scale (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (fma.f64 1/2267481600000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/3779136000000))) (pow.f64 (PI.f64) 2))))))) (/.f64 (.f64 90 x-scale) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (*.f64 x-scale x-scale))))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (/.f64 (.f64 x-scale (-.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 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (/.f64 (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (/.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (.f64 -1/11664000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) 2)) (.f64 (pow.f64 y-scale 2) (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 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 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 2/45 (/.f64 (.f64 (+.f64 (.f64 1/2267481600000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/4534963200000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 5))) (.f64 1/22674816000000 (.f64 (pow.f64 (PI.f64) 5) (+.f64 a b))))) (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (+.f64 a b) (PI.f64)))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (.f64 1/2 (/.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (.f64 1/45 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (.f64 -1/11664000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (.f64 (+.f64 a b) (PI.f64)))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (.f64 1/45 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (+.f64 a b) (.f64 (PI.f64) (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (.f64 -1/11664000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 3))))))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 32400 (/.f64 (.f64 (+.f64 (.f64 -1/1469328076800000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7))) (+.f64 (.f64 -1/30855889612800000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7))) (+.f64 (.f64 -1/881596846080000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7))) (.f64 -1/4407984230400000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7)))))) (.f64 x-scale (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))) (+.f64 (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.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/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) x-scale) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 x-scale (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2))))) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 180 (/.f64 (.f64 x-scale (-.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/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 (.f64 1/45 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (.f64 -1/11664000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (.f64 (+.f64 a b) (PI.f64)))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (.f64 1/45 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (+.f64 a b) (.f64 (PI.f64) (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (.f64 -1/11664000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 3))))))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 32400 (/.f64 (.f64 (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))))) (.f64 x-scale (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))) (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 180 (/.f64 (.f64 x-scale (-.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (.f64 x-scale (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))))) (+.f64 (.f64 1/2 (.f64 angle (-.f64 (.f64 180 (/.f64 (.f64 x-scale (-.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (.f64 x-scale (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2))))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (.f64 x-scale (-.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/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 (.f64 1/45 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (+.f64 a b) (.f64 (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (.f64 -1/11664000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (PI.f64)))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 1/45 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (.f64 -1/11664000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (.f64 (PI.f64) (+.f64 a b)))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 180 (/.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/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) x-scale) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 x-scale (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 x-scale (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))))) (.f64 90 (/.f64 (.f64 x-scale (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))))
(fma.f64 1/2 (.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)))) (fma.f64 1/2 (/.f64 (+.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))))) (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 (.f64 -1/11664000 (+.f64 b a)) (pow.f64 (PI.f64) 3))) 2) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a)))))) (.f64 2/45 (.f64 (/.f64 (fma.f64 1/2267481600000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 5)) (fma.f64 1/4534963200000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 5)) (.f64 1/22674816000000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 5))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (PI.f64) (+.f64 b a))) (.f64 y-scale 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) 2) (.f64 1/45 (+.f64 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 (.f64 -1/11664000 (+.f64 b a)) (pow.f64 (PI.f64) 3))) (.f64 (PI.f64) (+.f64 b a))) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 (.f64 -1/11664000 (+.f64 b a)) (pow.f64 (PI.f64) 3))) (.f64 (PI.f64) (+.f64 b a))) (.f64 x-scale x-scale)))))))) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) 2)) (/.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) 2) (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 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 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))))) (PI.f64)))) (fma.f64 32400 (/.f64 (fma.f64 -1/1469328076800000000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 7)) (fma.f64 -1/30855889612800000000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 7)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 7)) -1/734664038400000000))) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 180 (+.f64 (.f64 (/.f64 (+.f64 (.f64 180 (.f64 (/.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 x-scale (PI.f64)))) (.f64 -32400 (.f64 (/.f64 x-scale (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000)) (pow.f64 (PI.f64) 2))))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (fma.f64 1/22674816000000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/1511654400000)) (PI.f64))) (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (-.f64 (.f64 180 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (-.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/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) 2) (.f64 1/45 (+.f64 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 (.f64 -1/11664000 (+.f64 b a)) (pow.f64 (PI.f64) 3))) (.f64 (PI.f64) (+.f64 b a))) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 (.f64 -1/11664000 (+.f64 b a)) (pow.f64 (PI.f64) 3))) (.f64 (PI.f64) (+.f64 b a))) (.f64 x-scale x-scale)))))))) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))) (PI.f64)))) (fma.f64 32400 (.f64 (/.f64 (fma.f64 1/2267481600000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/3779136000000)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (pow.f64 (PI.f64) 2))) (.f64 180 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (.f64 180 (.f64 (/.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 x-scale (PI.f64)))) (.f64 -32400 (/.f64 (.f64 (.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) x-scale) (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (PI.f64)))))) (PI.f64)))))))) (fma.f64 1/2 (.f64 angle (+.f64 (.f64 180 (.f64 (/.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 x-scale (PI.f64)))) (.f64 -32400 (/.f64 (.f64 (.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) x-scale) (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (fma.f64 1/2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (-.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/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) 2) (.f64 1/45 (+.f64 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 (.f64 -1/11664000 (+.f64 b a)) (pow.f64 (PI.f64) 3))) (.f64 (PI.f64) (+.f64 b a))) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 (.f64 -1/11664000 (+.f64 b a)) (pow.f64 (PI.f64) 3))) (.f64 (PI.f64) (+.f64 b a))) (.f64 x-scale x-scale)))))))) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))) (PI.f64)))) (fma.f64 180 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (.f64 180 (.f64 (/.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 x-scale (PI.f64)))) (.f64 -32400 (.f64 (/.f64 x-scale (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000)) (pow.f64 (PI.f64) 2))))))) (/.f64 (.f64 32400 (.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (fma.f64 1/22674816000000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/1511654400000)))) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (.f64 90 (.f64 (/.f64 x-scale angle) (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))
(fma.f64 1/2 (.f64 (pow.f64 angle 5) (-.f64 (/.f64 (.f64 180 x-scale) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)))) (fma.f64 1/2 (/.f64 (+.f64 (fma.f64 2 (.f64 (-.f64 (/.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 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 (.f64 -1/11664000 (+.f64 b a)) (pow.f64 (PI.f64) 3))) 2) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a)))))) (.f64 2/45 (.f64 (/.f64 (fma.f64 1/2267481600000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 5)) (fma.f64 1/4534963200000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 5)) (.f64 1/22674816000000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 5))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (PI.f64) (+.f64 b a))) (.f64 y-scale 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) 2) (.f64 1/45 (+.f64 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 (.f64 -1/11664000 (+.f64 b a)) (pow.f64 (PI.f64) 3))) (.f64 (PI.f64) (+.f64 b a))) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 (.f64 -1/11664000 (+.f64 b a)) (pow.f64 (PI.f64) 3))) (.f64 (PI.f64) (+.f64 b a))) (.f64 x-scale x-scale)))))))) (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 (.f64 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) 2)) (/.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) 2) (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 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 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))))))) (fma.f64 32400 (/.f64 (fma.f64 -1/1469328076800000000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 7)) (fma.f64 -1/30855889612800000000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 7)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 7)) -1/734664038400000000))) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 180 (+.f64 (.f64 (/.f64 (+.f64 (.f64 180 (.f64 (/.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 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 (.f64 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 x-scale (PI.f64)))) (.f64 -32400 (.f64 (/.f64 x-scale (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000)) (pow.f64 (PI.f64) 2))))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (fma.f64 1/2267481600000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/3779136000000)) (PI.f64))) (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (fma.f64 180 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (-.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/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) 2) (.f64 1/45 (+.f64 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 (.f64 -1/11664000 (+.f64 b a)) (pow.f64 (PI.f64) 3))) (.f64 (PI.f64) (+.f64 b a))) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 (.f64 -1/11664000 (+.f64 b a)) (pow.f64 (PI.f64) 3))) (.f64 (PI.f64) (+.f64 b a))) (.f64 x-scale x-scale)))))))) (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 (.f64 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))) (PI.f64))) (neg.f64 (fma.f64 32400 (.f64 (/.f64 x-scale (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (fma.f64 1/2267481600000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/3779136000000))) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 180 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (.f64 180 (.f64 (/.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 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 (.f64 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 x-scale (PI.f64)))) (.f64 -32400 (/.f64 (.f64 (.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) x-scale) (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))))))) (PI.f64)))))))) (fma.f64 1/2 (.f64 angle (+.f64 (.f64 180 (.f64 (/.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 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 (.f64 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 x-scale (PI.f64)))) (.f64 -32400 (/.f64 (.f64 (.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) x-scale) (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (fma.f64 1/2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (-.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/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) 2) (.f64 1/45 (+.f64 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 (.f64 -1/11664000 (+.f64 b a)) (pow.f64 (PI.f64) 3))) (.f64 (PI.f64) (+.f64 b a))) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 (.f64 -1/11664000 (+.f64 b a)) (pow.f64 (PI.f64) 3))) (.f64 (PI.f64) (+.f64 b a))) (.f64 x-scale x-scale)))))))) (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 (.f64 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))) (PI.f64)))) (fma.f64 180 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (.f64 180 (.f64 (/.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 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 (.f64 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 x-scale (PI.f64)))) (.f64 -32400 (.f64 (/.f64 x-scale (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000)) (pow.f64 (PI.f64) 2))))))) (.f64 32400 (.f64 (/.f64 x-scale (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (fma.f64 1/2267481600000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/3779136000000))) (pow.f64 (PI.f64) 2))))))) (/.f64 (.f64 90 x-scale) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))))
(.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 x-scale (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (-.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))))))
(/.f64 (.f64 1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))))
(.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 x-scale (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (-.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))))))
(/.f64 (.f64 1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))))
(.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 x-scale (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (-.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))))))
(/.f64 (.f64 1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))))
(.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 x-scale (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (-.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))))))
(/.f64 (.f64 1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))))
(.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 x-scale (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (-.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))))))
(/.f64 (.f64 1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))))
(.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 x-scale (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (-.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))))))
(/.f64 (.f64 1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))))
(.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 x-scale (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (-.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))))))
(/.f64 (.f64 1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))))
(.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 x-scale (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (-.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))))))
(/.f64 (.f64 1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))))
(.f64 -1/2 (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 -1/2 (.f64 (/.f64 x-scale (.f64 a a)) (/.f64 (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))))
(/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 a a)) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) b) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (.f64 a a)) (/.f64 (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (.f64 -2 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 y-scale b))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -2 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) b) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (.f64 1/2 (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2)) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2)))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (.f64 a a)) (/.f64 (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (fma.f64 -2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 y-scale b)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))) (.f64 1/2 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 x-scale (.f64 a a)) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 a a)) x-scale)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (.f64 (/.f64 x-scale (pow.f64 a 4)) (/.f64 (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -2 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) b) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (+.f64 (.f64 1/2 (.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale (-.f64 (.f64 8 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale))) (.f64 -4 (.f64 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2)))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (pow.f64 a 2) (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) 2)) (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (.f64 4 (.f64 (/.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 y-scale (pow.f64 a 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 x-scale 2) (pow.f64 y-scale 2)))))))))) (pow.f64 b 3))) (.f64 1/2 (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2)) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (.f64 a a)) (/.f64 (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (fma.f64 -2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 y-scale b)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))) (.f64 1/2 (+.f64 (.f64 (+.f64 (.f64 (.f64 1/2 (/.f64 x-scale (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 a a)) (+.f64 (.f64 8 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 4 (.f64 (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 a a)) x-scale)))) 2)) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))))) y-scale)) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))) (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 y-scale (.f64 a a)))))) (pow.f64 b 3)) (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 x-scale (.f64 a a)) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 a a)) x-scale)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (.f64 (/.f64 x-scale (pow.f64 a 4)) (/.f64 (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (.f64 a a)) (/.f64 (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (fma.f64 -2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 y-scale b)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))) (.f64 1/2 (+.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (.f64 (/.f64 x-scale (.f64 a a)) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 a a)) x-scale)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (.f64 (/.f64 x-scale (pow.f64 a 4)) (/.f64 (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (.f64 (+.f64 (.f64 (.f64 1/2 (/.f64 x-scale (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 a a)) (+.f64 (.f64 8 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 4 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))) (.f64 (.f64 (.f64 a a) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 a a)) x-scale)))) 2)) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))))))) (.f64 y-scale x-scale))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))) (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 y-scale (*.f64 a a)))))) (pow.f64 b 3))))))
(.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(.f64 1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(/.f64 (.f64 1/2 x-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (.f64 (/.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 y-scale b)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (.f64 (.f64 -2 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 b y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(fma.f64 1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (.f64 (/.f64 (.f64 -2 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale)) b) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (/.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2)) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (pow.f64 (.f64 4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 x-scale (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (.f64 (/.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 y-scale b)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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/2 (/.f64 (-.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)) (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (.f64 b b)) (fma.f64 1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (.f64 (.f64 -2 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 b y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))
(fma.f64 1/2 (/.f64 (-.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)) (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (.f64 b b)) (fma.f64 1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (.f64 (/.f64 (.f64 -2 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale)) b) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (/.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2)) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (pow.f64 (.f64 4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 x-scale (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 -2 (.f64 (/.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 y-scale b)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 -1/2 (.f64 (/.f64 (.f64 x-scale (-.f64 (.f64 -8 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale))) (.f64 4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (-.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2))))) (pow.f64 (.f64 4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (.f64 4 (.f64 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale))))) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))) (pow.f64 b 3))))))
(fma.f64 1/2 (/.f64 (-.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)) (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (.f64 b b)) (fma.f64 1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (fma.f64 -2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 b y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 1/2 (/.f64 (+.f64 (.f64 (.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (+.f64 (.f64 -8 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 a a)) x-scale))) (.f64 -4 (.f64 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) 2)))) x-scale)) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 y-scale (*.f64 a a)))))) (pow.f64 b 3))))))
(fma.f64 1/2 (/.f64 (-.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)) (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (.f64 b b)) (fma.f64 1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (fma.f64 -2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 b y-scale)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 1/2 (/.f64 (+.f64 (.f64 (.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (+.f64 (.f64 -8 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 a a)) x-scale))) (.f64 -4 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) 2))))) (.f64 y-scale x-scale)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 y-scale (.f64 a a)))))) (pow.f64 b 3))))))
(.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(.f64 1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(/.f64 (.f64 1/2 x-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (.f64 (/.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 y-scale b)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (.f64 (.f64 -2 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 b y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(fma.f64 1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (.f64 (/.f64 (.f64 -2 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale)) b) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2)) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 x-scale (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (.f64 -2 (.f64 (/.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 y-scale b)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (fma.f64 1/2 (/.f64 (-.f64 (/.f64 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (.f64 b b)) (.f64 (.f64 -2 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 b y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))
(fma.f64 1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (fma.f64 1/2 (/.f64 (-.f64 (/.f64 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (.f64 b b)) (.f64 (/.f64 (.f64 -2 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale)) b) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 -1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (/.f64 (.f64 x-scale (-.f64 (.f64 8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 x-scale y-scale))) (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2)))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (pow.f64 a 2)) y-scale) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))) (pow.f64 b 3))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 x-scale (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2)) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 x-scale (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (.f64 -2 (.f64 (/.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 y-scale b)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (fma.f64 -1/2 (/.f64 (+.f64 (.f64 (.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (+.f64 (.f64 8 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 a a)) x-scale))) (.f64 4 (.f64 (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) 2)))))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 y-scale (.f64 a a)))))) (pow.f64 b 3)) (fma.f64 1/2 (/.f64 (-.f64 (/.f64 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (.f64 b b)) (.f64 (.f64 -2 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 b y-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))
(fma.f64 1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (fma.f64 -1/2 (/.f64 (+.f64 (.f64 4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 y-scale (.f64 a a))))) (.f64 (.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (+.f64 (/.f64 (.f64 8 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) (/.f64 (.f64 y-scale x-scale) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 a a)))) (.f64 4 (.f64 (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) 2)))))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (pow.f64 b 3)) (fma.f64 1/2 (/.f64 (-.f64 (/.f64 x-scale (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (neg.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (.f64 b b)) (.f64 (/.f64 (.f64 -2 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale)) b) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))
(.f64 -1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 -1/2 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))))
(/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))
(+.f64 (.f64 -1/4 (/.f64 (.f64 x-scale (.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(fma.f64 -1/4 (/.f64 (.f64 (.f64 x-scale (.f64 y-scale y-scale)) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) 2))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) (.f64 -1/2 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))))
(fma.f64 -1/4 (/.f64 (.f64 (.f64 x-scale (.f64 y-scale y-scale)) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) 2))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))
(+.f64 (.f64 -1/4 (/.f64 (.f64 x-scale (.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/8 (/.f64 (.f64 x-scale (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)) (pow.f64 y-scale 4)))) (.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 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))))
(fma.f64 -1/4 (/.f64 (.f64 (.f64 x-scale (.f64 y-scale y-scale)) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) 2))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) (fma.f64 -1/2 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 1/8 (.f64 (/.f64 x-scale (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2)) (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) 2)) (pow.f64 y-scale 4))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))))))))
(fma.f64 -1/4 (/.f64 (.f64 (.f64 x-scale (.f64 y-scale y-scale)) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) 2))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) (fma.f64 -1/2 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (/.f64 (.f64 1/8 x-scale) (/.f64 (.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))))) (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) 2)) (pow.f64 y-scale 4)))))))
(+.f64 (.f64 1/4 (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale 6) (+.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 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/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 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (.f64 (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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 x-scale (.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/8 (/.f64 (.f64 x-scale (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)) (pow.f64 y-scale 4)))) (.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 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))))
(fma.f64 1/4 (.f64 (/.f64 x-scale (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 (pow.f64 y-scale 6) (+.f64 (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) 2)) (/.f64 (.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2)) (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))))) (pow.f64 (/.f64 (.f64 1/2 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) 2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) 2))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 -1/4 (/.f64 (.f64 (.f64 x-scale (.f64 y-scale y-scale)) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) 2))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) (fma.f64 -1/2 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 1/8 (.f64 (/.f64 x-scale (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2)) (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) 2)) (pow.f64 y-scale 4))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 a a)))))))))))
(fma.f64 1/4 (.f64 (/.f64 x-scale (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 (pow.f64 y-scale 6) (+.f64 (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) 2)) (/.f64 (.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2)) (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))))) (pow.f64 (/.f64 (.f64 1/2 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) 2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) 2))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 -1/4 (/.f64 (.f64 (.f64 x-scale (.f64 y-scale y-scale)) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) 2))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) (fma.f64 -1/2 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (/.f64 (.f64 1/8 x-scale) (/.f64 (.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))))) (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))) 2)) (pow.f64 y-scale 4))))))))
(.f64 -1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 -1/2 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))
(/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 y-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 1/2 (.f64 (/.f64 x-scale (.f64 y-scale y-scale)) (/.f64 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (/.f64 (.f64 1/2 x-scale) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) (/.f64 (.f64 -1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 x-scale (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 y-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (fma.f64 -1/4 (.f64 (/.f64 x-scale (pow.f64 y-scale 4)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) 2)) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (.f64 1/2 (.f64 (/.f64 x-scale (.f64 y-scale y-scale)) (/.f64 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (fma.f64 -1/4 (.f64 (/.f64 x-scale (pow.f64 y-scale 4)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) 2)) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (/.f64 (.f64 1/2 x-scale) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) (/.f64 (.f64 -1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 x-scale (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 y-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 1/8 (/.f64 (.f64 x-scale (.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 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))))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (fma.f64 -1/4 (.f64 (/.f64 x-scale (pow.f64 y-scale 4)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) 2)) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 1/2 (.f64 (/.f64 x-scale (.f64 y-scale y-scale)) (/.f64 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (/.f64 (.f64 1/8 (.f64 x-scale (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) 2))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (pow.f64 y-scale 6)) (.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (fma.f64 -1/4 (.f64 (/.f64 x-scale (pow.f64 y-scale 4)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) 2)) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 1/2 (.f64 (/.f64 x-scale (.f64 y-scale y-scale)) (/.f64 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) (/.f64 (.f64 -1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (/.f64 (.f64 1/8 (.f64 x-scale (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) 2))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (pow.f64 y-scale 6)) (.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))))))
(.f64 -1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 -1/2 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))
(/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 y-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 1/2 (.f64 (/.f64 x-scale (.f64 y-scale y-scale)) (/.f64 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (/.f64 (.f64 1/2 x-scale) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) (/.f64 (.f64 -1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 x-scale (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 y-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (fma.f64 -1/4 (.f64 (/.f64 x-scale (pow.f64 y-scale 4)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) 2)) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (.f64 1/2 (.f64 (/.f64 x-scale (.f64 y-scale y-scale)) (/.f64 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (fma.f64 -1/4 (.f64 (/.f64 x-scale (pow.f64 y-scale 4)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) 2)) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (/.f64 (.f64 1/2 x-scale) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) (/.f64 (.f64 -1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 x-scale (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 y-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 1/8 (/.f64 (.f64 x-scale (.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 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))))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (fma.f64 -1/4 (.f64 (/.f64 x-scale (pow.f64 y-scale 4)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) 2)) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 1/2 (.f64 (/.f64 x-scale (.f64 y-scale y-scale)) (/.f64 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (/.f64 (.f64 1/8 (.f64 x-scale (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) 2))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (pow.f64 y-scale 6)) (.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (fma.f64 -1/4 (.f64 (/.f64 x-scale (pow.f64 y-scale 4)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) 2)) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 1/2 (.f64 (/.f64 x-scale (.f64 y-scale y-scale)) (/.f64 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) (/.f64 (.f64 -1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (/.f64 (.f64 1/8 (.f64 x-scale (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) 2))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (pow.f64 y-scale 6)) (.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))))))
(.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(+.f64 (.f64 1/2 (.f64 x-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (pow.f64 b 2) (pow.f64 a 2)))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(fma.f64 1/2 (.f64 x-scale (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 b b) (.f64 a a))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (/.f64 (/.f64 (.f64 (.f64 b b) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 y-scale y-scale)) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))))))) (.f64 -1/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(+.f64 (.f64 1/2 (.f64 x-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (pow.f64 b 2) (pow.f64 a 2)))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)) (pow.f64 x-scale 3)) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(fma.f64 1/2 (.f64 x-scale (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 b b) (.f64 a a))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (/.f64 (/.f64 (.f64 (.f64 b b) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 y-scale y-scale)) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))))))) (fma.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) 2)) (/.f64 (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) (pow.f64 x-scale 3))) (.f64 -1/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))
(+.f64 (.f64 1/2 (.f64 x-scale (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (pow.f64 b 2) (pow.f64 a 2)))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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/8 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 5) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)))) (.f64 (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 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)) (pow.f64 x-scale 3)) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))
(fma.f64 1/2 (.f64 x-scale (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 b b) (.f64 a a))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (/.f64 (/.f64 (.f64 (.f64 b b) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 y-scale y-scale)) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))))))) (fma.f64 1/8 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2)) (/.f64 (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) 2)) (pow.f64 x-scale 5)) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))))) (fma.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) 2)) (/.f64 (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) (pow.f64 x-scale 3))) (.f64 -1/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))))
(.f64 -1/2 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (.f64 (.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(fma.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (.f64 (.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (.f64 -1/4 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2))) (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 1/8 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2))) (.f64 (pow.f64 x-scale 5) (.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))) 3) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))
(fma.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (.f64 (.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 1/8 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (pow.f64 x-scale 5)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 3)))))))
(fma.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (.f64 (.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (/.f64 (.f64 1/8 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (/.f64 (.f64 (pow.f64 x-scale 5) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 3))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 1/4 (/.f64 (+.f64 (.f64 -1/4 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)))) (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))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 7) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 1/8 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2))) (.f64 (pow.f64 x-scale 5) (.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))) 3) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))))
(fma.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (.f64 (.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 1/4 (/.f64 (fma.f64 -1/4 (/.f64 (.f64 (.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 4)) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (.f64 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 x-scale 7))) (fma.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 1/8 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (pow.f64 x-scale 5)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 3))))))))
(fma.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (.f64 (.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 1/4 (/.f64 (fma.f64 -1/4 (/.f64 (.f64 (.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 4)) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (.f64 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 x-scale 7))) (fma.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (/.f64 (.f64 1/8 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (/.f64 (.f64 (pow.f64 x-scale 5) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 3))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)))))))
(.f64 -1/2 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (.f64 (.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(fma.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (.f64 (.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (.f64 -1/4 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2))) (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 1/8 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2))) (.f64 (pow.f64 x-scale 5) (.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))) 3) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))
(fma.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (.f64 (.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 1/8 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (pow.f64 x-scale 5)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 3)))))))
(fma.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (.f64 (.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (/.f64 (.f64 1/8 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (/.f64 (.f64 (pow.f64 x-scale 5) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 3))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))) 2))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 1/4 (/.f64 (+.f64 (.f64 -1/4 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)))) (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))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 7) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 1/8 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2))) (.f64 (pow.f64 x-scale 5) (.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))) 3) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))))
(fma.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (.f64 (.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 1/4 (/.f64 (fma.f64 -1/4 (/.f64 (.f64 (.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 4)) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (.f64 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 x-scale 7))) (fma.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 1/8 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (pow.f64 x-scale 5)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 3))))))))
(fma.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (.f64 (.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 1/4 (/.f64 (fma.f64 -1/4 (/.f64 (.f64 (.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 4)) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (.f64 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 x-scale 7))) (fma.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (.f64 (pow.f64 x-scale 3) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (/.f64 (.f64 1/8 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (/.f64 (.f64 (pow.f64 x-scale 5) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 3))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)))))))
(-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))
(-.f64 (+.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 a (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(-.f64 (fma.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)))) (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (.f64 a (.f64 b b)) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)))))
(-.f64 (+.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 a (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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 a 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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 4 (pow.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2))))) (pow.f64 (.f64 4 (.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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))))))))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(-.f64 (fma.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)))) (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (.f64 a (.f64 b b)) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (fma.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (.f64 b b) x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))))) y-scale))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)))))
(-.f64 (+.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 a (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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 a 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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 4 (pow.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2))))) (pow.f64 (.f64 4 (.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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))))))))) 2)))) (/.f64 (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 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 a 3) (-.f64 (.f64 -8 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale))) (.f64 4 (.f64 (/.f64 (.f64 (-.f64 (+.f64 (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2)) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (.f64 4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.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 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(-.f64 (fma.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)))) (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (.f64 a (.f64 b b)) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (+.f64 (fma.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (.f64 b b) x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))))) y-scale))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 -1/2 (.f64 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (pow.f64 a 3)) (+.f64 (.f64 -8 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) y-scale))) (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))) (/.f64 (-.f64 (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) x-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))) 2)) (/.f64 (.f64 y-scale x-scale) (.f64 (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))))))))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)))))
(-.f64 (+.f64 (fma.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)))) (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (.f64 a (.f64 b b)) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (fma.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (.f64 b b) x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))))) y-scale))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 -1/2 (.f64 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (pow.f64 a 3)) (+.f64 (.f64 -8 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) y-scale))) (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))) (/.f64 (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) x-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2))))) 2)) (/.f64 (.f64 y-scale x-scale) (.f64 (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))))))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))) 2)))))
(.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(+.f64 (.f64 4 (.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))
(fma.f64 4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 a y-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))))) x-scale))) (.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(fma.f64 4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 a y-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))))) x-scale))) (.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(-.f64 (+.f64 (.f64 4 (.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (pow.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2)) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(-.f64 (fma.f64 4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 a y-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))))) x-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) y-scale)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))
(-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 a y-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))))) x-scale))) (.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) y-scale)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))
(-.f64 (+.f64 (.f64 4 (.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (.f64 -1/2 (.f64 (/.f64 (-.f64 (.f64 8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale))))))) (.f64 x-scale y-scale))) (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 x-scale y-scale)) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))) a) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (pow.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2)) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(-.f64 (fma.f64 4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 a y-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))))) x-scale))) (fma.f64 -1/2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 8 (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))))))) (.f64 y-scale x-scale)) (.f64 (.f64 -4 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) x-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) y-scale)))) 2))) y-scale))) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) a) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) y-scale)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))))
(-.f64 (fma.f64 4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 a y-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))))) x-scale))) (fma.f64 -1/2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 8 (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))))))) (.f64 y-scale x-scale)) (.f64 (.f64 -4 (/.f64 (.f64 (.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) y-scale)))) 2)))) (.f64 y-scale x-scale))) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) a) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) y-scale)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))
(.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(+.f64 (.f64 -4 (.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))
(fma.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 a y-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))))) x-scale))) (.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(fma.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 a y-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))))) x-scale))) (.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(-.f64 (+.f64 (/.f64 (.f64 (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 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (pow.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2)) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (fma.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 a y-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))))) x-scale))) (.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) y-scale)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (fma.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 a y-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))))) x-scale))) (.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) y-scale)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))))
(-.f64 (+.f64 (/.f64 (.f64 (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 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 1/2 (.f64 (/.f64 (-.f64 (.f64 8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale))))))) (.f64 x-scale y-scale))) (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 x-scale y-scale)) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))) a) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2)) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (fma.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 a y-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))))) x-scale))) (fma.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 1/2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 8 (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))))))) (.f64 y-scale x-scale)) (.f64 (.f64 -4 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) x-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) y-scale)))) 2))) y-scale))) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) a)))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) y-scale)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b))))))
(+.f64 (fma.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 a y-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))))) x-scale))) (fma.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 1/2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 8 (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))))))) (.f64 y-scale x-scale)) (.f64 (.f64 -4 (/.f64 (.f64 (.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) y-scale)))) 2)))) (.f64 y-scale x-scale))) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) a)))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))) (.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) y-scale) (/.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) y-scale)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))))
(-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))
(.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (*.f64 x-scale x-scale))))
(-.f64 (+.f64 (.f64 2 (/.f64 (pow.f64 a 2) (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 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (pow.f64 angle 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))
(+.f64 (fma.f64 2 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 angle angle))) (.f64 -2 (/.f64 (.f64 b b) (*.f64 x-scale x-scale))))
(+.f64 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 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 (.f64 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 angle angle)) (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
(-.f64 (+.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 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/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (pow.f64 angle 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/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 (.f64 1/45 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (.f64 -1/11664000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (.f64 (+.f64 a b) (PI.f64)))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (.f64 1/45 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (+.f64 a b) (.f64 (PI.f64) (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (.f64 -1/11664000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 3))))))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 angle 4)))) (*.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))
(+.f64 (fma.f64 2 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (fma.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 angle angle) (.f64 (-.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/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) 2) (.f64 1/45 (+.f64 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 (.f64 -1/11664000 (+.f64 b a)) (pow.f64 (PI.f64) 3))) (.f64 (PI.f64) (+.f64 b a))) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 (.f64 -1/11664000 (+.f64 b a)) (pow.f64 (PI.f64) 3))) (.f64 (PI.f64) (+.f64 b a))) (.f64 x-scale x-scale)))))))) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))) (pow.f64 angle 4)))) (.f64 -2 (/.f64 (.f64 b b) (*.f64 x-scale x-scale))))
(+.f64 (fma.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 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 (.f64 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 angle angle) (.f64 (-.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/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) 2) (.f64 1/45 (+.f64 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 (.f64 -1/11664000 (+.f64 b a)) (pow.f64 (PI.f64) 3))) (.f64 (PI.f64) (+.f64 b a))) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 (.f64 -1/11664000 (+.f64 b a)) (pow.f64 (PI.f64) 3))) (.f64 (PI.f64) (+.f64 b a))) (.f64 x-scale x-scale)))))))) (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 (.f64 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))) (pow.f64 angle 4))) (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
(-.f64 (+.f64 (.f64 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/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 (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 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 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (.f64 -1/11664000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 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 2/45 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (+.f64 (.f64 1/2267481600000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/4534963200000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 5))) (.f64 1/22674816000000 (.f64 (pow.f64 (PI.f64) 5) (+.f64 a b))))) (.f64 (PI.f64) (+.f64 a b)))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (.f64 1/2 (/.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (.f64 1/45 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (+.f64 a b) (.f64 (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (.f64 -1/11664000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (PI.f64)))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 1/45 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (.f64 -1/11664000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (.f64 (PI.f64) (+.f64 a b)))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (pow.f64 angle 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/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 (.f64 1/45 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (.f64 -1/11664000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 3)))) (.f64 (+.f64 a b) (PI.f64)))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (.f64 1/45 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (+.f64 a b) (.f64 (PI.f64) (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (+.f64 a b))) (.f64 -1/11664000 (.f64 (+.f64 a b) (pow.f64 (PI.f64) 3))))))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (+.f64 a b) 2) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 angle 4))))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))
(+.f64 (fma.f64 2 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (fma.f64 (pow.f64 angle 6) (-.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 (+.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 1/2 (+.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 (.f64 -1/11664000 (+.f64 b a)) (pow.f64 (PI.f64) 3))) 2) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))))) (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a)))))) (.f64 2/45 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 (PI.f64) (+.f64 b a)) (fma.f64 1/2267481600000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 5)) (fma.f64 1/4534963200000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 5)) (.f64 1/22674816000000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 5)))))) (.f64 x-scale x-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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) 2) (.f64 1/45 (+.f64 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 (.f64 -1/11664000 (+.f64 b a)) (pow.f64 (PI.f64) 3))) (.f64 (PI.f64) (+.f64 b a))) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 (.f64 -1/11664000 (+.f64 b a)) (pow.f64 (PI.f64) 3))) (.f64 (PI.f64) (+.f64 b a))) (.f64 x-scale x-scale)))))))) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) 2)) (/.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) 2) (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (fma.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 angle angle) (.f64 (-.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/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) 2) (.f64 1/45 (+.f64 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 (.f64 -1/11664000 (+.f64 b a)) (pow.f64 (PI.f64) 3))) (.f64 (PI.f64) (+.f64 b a))) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 (.f64 -1/11664000 (+.f64 b a)) (pow.f64 (PI.f64) 3))) (.f64 (PI.f64) (+.f64 b a))) (.f64 x-scale x-scale)))))))) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))) (pow.f64 angle 4))))) (.f64 -2 (/.f64 (.f64 b b) (*.f64 x-scale x-scale))))
(+.f64 (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 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-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 a a) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))))) (/.f64 (.f64 1/2 (+.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 (.f64 -1/11664000 (+.f64 b a)) (pow.f64 (PI.f64) 3))) 2) (.f64 x-scale x-scale))) (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 (.f64 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a)))))) (.f64 2/45 (/.f64 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (PI.f64) (+.f64 b a)) (fma.f64 1/2267481600000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 5)) (fma.f64 1/4534963200000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 5)) (.f64 1/22674816000000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 5))))))) (.f64 x-scale x-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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) 2) (.f64 1/45 (+.f64 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 (.f64 -1/11664000 (+.f64 b a)) (pow.f64 (PI.f64) 3))) (.f64 (PI.f64) (+.f64 b a))) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 (.f64 -1/11664000 (+.f64 b a)) (pow.f64 (PI.f64) 3))) (.f64 (PI.f64) (+.f64 b a))) (.f64 x-scale x-scale)))))))) (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 (.f64 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) 2)) (/.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) 2) (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (fma.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 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 (.f64 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 angle angle) (.f64 (-.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/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) 2) (.f64 1/45 (+.f64 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 (.f64 -1/11664000 (+.f64 b a)) (pow.f64 (PI.f64) 3))) (.f64 (PI.f64) (+.f64 b a))) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (fma.f64 -1/34992000 (.f64 (+.f64 b a) (pow.f64 (PI.f64) 3)) (.f64 (.f64 -1/11664000 (+.f64 b a)) (pow.f64 (PI.f64) 3))) (.f64 (PI.f64) (+.f64 b a))) (.f64 x-scale x-scale)))))))) (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 (.f64 1/32400 (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (+.f64 b a) 2))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))) (pow.f64 angle 4)))) (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))
(-.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))
(-.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))
(-.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))
(-.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))
(-.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))
(-.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))
(-.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))
(-.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))))
(-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(-.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))
(-.f64 (+.f64 (.f64 4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (pow.f64 a 2) (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(-.f64 (fma.f64 4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 (.f64 a a) b) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) x-scale))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))))
(-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2)))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (pow.f64 a 2) (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (+.f64 (.f64 4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (pow.f64 a 2) (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(-.f64 (fma.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 a a)) x-scale)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 b b) (fma.f64 4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 (.f64 a a) b) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) x-scale))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))))
(-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2)))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (pow.f64 a 2) (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (+.f64 (.f64 4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (pow.f64 a 2) (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (+.f64 (.f64 -1/2 (.f64 (.f64 (pow.f64 b 3) (-.f64 (.f64 8 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale))) (.f64 -4 (.f64 (/.f64 (.f64 (pow.f64 a 2) (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2)) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) 2)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(-.f64 (fma.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 a a)) x-scale)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 b b) (fma.f64 4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 (.f64 a a) b) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) x-scale))) (fma.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (.f64 (pow.f64 b 3) (+.f64 (.f64 8 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 4 (/.f64 (.f64 (.f64 (.f64 (.f64 a a) (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 a a)) x-scale)))) 2)))) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))))) (.f64 y-scale x-scale)))))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (*.f64 x-scale x-scale))))))))
(.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 b b) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(+.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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))))))
(fma.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 b (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) x-scale))) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(fma.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 b (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) x-scale))) (.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(-.f64 (+.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2))))) (pow.f64 (.f64 4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(-.f64 (fma.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 b (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) x-scale))) (fma.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))
(-.f64 (fma.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 b (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) x-scale))) (fma.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))
(-.f64 (+.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 x-scale y-scale))) (.f64 4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2)) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (pow.f64 (.f64 4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))) b))) (+.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2))))) (pow.f64 (.f64 4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(-.f64 (fma.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 b (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) x-scale))) (fma.f64 -1/2 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (+.f64 (.f64 -8 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 a a)) x-scale))) (.f64 -4 (.f64 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) 2)))) x-scale)) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))) b) (fma.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))
(-.f64 (fma.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 b (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) x-scale))) (fma.f64 -1/2 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (+.f64 (.f64 -8 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 a a)) x-scale))) (.f64 -4 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) 2))))) (.f64 y-scale x-scale))))) b) (fma.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))
(.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 b b) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(+.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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))))))
(fma.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 b (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) x-scale))) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(fma.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 b (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) x-scale))) (.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(-.f64 (+.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2)))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(-.f64 (fma.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 b (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) x-scale))) (fma.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))
(-.f64 (fma.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 b (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) x-scale))) (fma.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))
(-.f64 (+.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) (+.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.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 (.f64 8 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale x-scale))) (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) 2)) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))) b)))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 4 (pow.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 y-scale x-scale)))) 2)))) (pow.f64 (.f64 -4 (.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 -1 (/.f64 (.f64 a (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))) 2)))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(-.f64 (fma.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 b (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) x-scale))) (+.f64 (fma.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (+.f64 (.f64 8 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 a a)) x-scale))) (.f64 4 (.f64 (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) 2)))))))) b)))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))
(-.f64 (+.f64 (fma.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 b (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) x-scale))) (fma.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (+.f64 (/.f64 (.f64 8 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) (/.f64 (.f64 y-scale x-scale) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 a a)))) (.f64 4 (.f64 (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) 2)))))))) b))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))
(.f64 -1 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(neg.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))
(fma.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) 2)))) (neg.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (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 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/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 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (.f64 -1 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(fma.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) 2)))) (fma.f64 1/4 (.f64 (/.f64 (pow.f64 y-scale 4) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) 2))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2))) (neg.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (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 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 6) (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/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 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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) (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 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/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 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))) (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (.f64 -1 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))))))
(fma.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) 2)))) (fma.f64 1/2 (/.f64 (pow.f64 y-scale 6) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) (+.f64 (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) 2)) (/.f64 (.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2)) (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))))) (pow.f64 (/.f64 (.f64 1/2 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) 2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) 2)))) (fma.f64 1/4 (.f64 (/.f64 (pow.f64 y-scale 4) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) 2))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2))) (neg.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))))
(.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(neg.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(-.f64 (+.f64 (.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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)))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))
(-.f64 (+.f64 (.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 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))))) 2)) (.f64 (pow.f64 y-scale 4) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 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 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) 2)) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (pow.f64 y-scale 4))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))
(-.f64 (+.f64 (.f64 1/4 (/.f64 (.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 y-scale 6) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2))))) (+.f64 (.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 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))))) 2)) (.f64 (pow.f64 y-scale 4) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 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 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (fma.f64 1/4 (.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) 2)) (pow.f64 y-scale 6)) (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)))) (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) 2)) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (pow.f64 y-scale 4))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))
(.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(neg.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(-.f64 (+.f64 (.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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)))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))
(-.f64 (+.f64 (.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 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))))) 2)) (.f64 (pow.f64 y-scale 4) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 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 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) 2)) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (pow.f64 y-scale 4))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))
(-.f64 (+.f64 (.f64 1/4 (/.f64 (.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 y-scale 6) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2))))) (+.f64 (.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 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))))) 2)) (.f64 (pow.f64 y-scale 4) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 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 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (fma.f64 1/4 (.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) 2)) (pow.f64 y-scale 6)) (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2)))) (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) 2)) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (pow.f64 y-scale 4))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))) (.f64 x-scale x-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))))
(.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 x-scale x-scale)))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 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 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(-.f64 (+.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 x-scale x-scale)))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 x-scale x-scale)))) (/.f64 (.f64 -1/2 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.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 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 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 -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 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(+.f64 (+.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (fma.f64 -1 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 x-scale x-scale)) (.f64 -1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) 2))))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (fma.f64 -1 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 x-scale x-scale)) (/.f64 (.f64 -1/2 (.f64 x-scale x-scale)) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) 2))))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.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 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 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 1/4 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)) (pow.f64 x-scale 4))) (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (.f64 -1/2 (/.f64 (.f64 (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 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(+.f64 (+.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (fma.f64 -1 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 x-scale x-scale)) (fma.f64 1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) 2)) (pow.f64 x-scale 4)) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2))) (.f64 -1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) 2)))))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (+.f64 (fma.f64 -1 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 x-scale x-scale)) (fma.f64 1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) 2)) (pow.f64 x-scale 4)) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2))) (/.f64 (.f64 -1/2 (.f64 x-scale x-scale)) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))))) 2)))))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 a a))))))))
(.f64 -1 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (.f64 x-scale x-scale)))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 -1 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (pow.f64 x-scale 2))))
(fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (pow.f64 x-scale 4))) (neg.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (*.f64 x-scale x-scale))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 1/4 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2))) (.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 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (pow.f64 x-scale 2)))))
(fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (pow.f64 x-scale 4))) (fma.f64 1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (pow.f64 x-scale 6)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 3))) (neg.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (.f64 x-scale x-scale)))))
(fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (pow.f64 x-scale 4))) (fma.f64 1/4 (/.f64 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (pow.f64 x-scale 6)) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 3)) (neg.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (.f64 x-scale x-scale)))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 1/4 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2))) (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3)))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -1/4 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)))) (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))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 8) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (pow.f64 x-scale 2))))))
(fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (pow.f64 x-scale 4))) (fma.f64 1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (pow.f64 x-scale 6)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 3))) (fma.f64 1/2 (/.f64 (fma.f64 -1/4 (/.f64 (.f64 (.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 4)) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (pow.f64 x-scale 8))) (neg.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (.f64 x-scale x-scale))))))
(fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (pow.f64 x-scale 4))) (fma.f64 1/4 (/.f64 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (pow.f64 x-scale 6)) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 3)) (fma.f64 1/2 (/.f64 (fma.f64 -1/4 (/.f64 (.f64 (.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 4)) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (pow.f64 x-scale 8))) (neg.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (.f64 x-scale x-scale))))))
(.f64 -1 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (.f64 x-scale x-scale)))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 -1 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (pow.f64 x-scale 2))))
(fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (pow.f64 x-scale 4))) (neg.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (*.f64 x-scale x-scale))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 1/4 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2))) (.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 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (pow.f64 x-scale 2)))))
(fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (pow.f64 x-scale 4))) (fma.f64 1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (pow.f64 x-scale 6)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 3))) (neg.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (.f64 x-scale x-scale)))))
(fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (pow.f64 x-scale 4))) (fma.f64 1/4 (/.f64 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (pow.f64 x-scale 6)) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 3)) (neg.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (.f64 x-scale x-scale)))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 1/4 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2))) (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3)))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -1/4 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)))) (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))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 8) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2)))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (pow.f64 x-scale 2))))))
(fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (pow.f64 x-scale 4))) (fma.f64 1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (pow.f64 x-scale 6)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 3))) (fma.f64 1/2 (/.f64 (fma.f64 -1/4 (/.f64 (.f64 (.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 4)) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (pow.f64 x-scale 8))) (neg.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (.f64 x-scale x-scale))))))
(fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (pow.f64 x-scale 4))) (fma.f64 1/4 (/.f64 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (pow.f64 x-scale 6)) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 3)) (fma.f64 1/2 (/.f64 (fma.f64 -1/4 (/.f64 (.f64 (.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) 4)) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (pow.f64 x-scale 8))) (neg.f64 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 b a) 2))))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)))) (.f64 x-scale x-scale))))))
(-.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) 2)))) (/.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) 2)))))
(-.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale)) 2))) (/.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale)))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale)) 2))))
(-.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale)) 2))) (/.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) 2) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale)))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale)) 2))))
(.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (/.f64 1 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) 2)))))
(/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale)) 2)))
(/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) 2) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale)) 2)))
(.f64 1 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) 2)))))
(/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale)) 2)))
(/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) 2) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale)) 2)))
(.f64 (sqrt.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) 2))))) (sqrt.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale) 2))))))
(/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale)) 2)))
(/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) 2) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale)) 2)))
(.f64 (.f64 (cbrt.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) 2))))) (cbrt.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) 2)))))) (cbrt.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale) 2))))))
(/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale)) 2)))
(/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) 2) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale)) 2)))
(pow.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale) 2)))) 1)
(/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale)) 2)))
(/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) 2) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale)) 2)))
(log.f64 (exp.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale) 2))))))
(/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale)) 2)))
(/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) 2) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale)) 2)))
(cbrt.f64 (.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) 2)))) (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) 2))))) (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale) 2))))))
(cbrt.f64 (.f64 (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale)) 2))) (.f64 (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale)) 2))) (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale)) 2))))))
(cbrt.f64 (.f64 (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) 2) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale)) 2))) (/.f64 (/.f64 (.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) 2) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))))) (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) 2) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale)))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale)) 2))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale)) 2)))))
(expm1.f64 (log1p.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale) 2))))))
(/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale)) 2)))
(/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) 2) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale)) 2)))
(exp.f64 (log.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale) 2))))))
(/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale)) 2)))
(/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) 2) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale)) 2)))
(log1p.f64 (expm1.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale) 2))))))
(/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale)) 2)))
(/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) 2) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale)) 2)))
(+.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (neg.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale)))))))
(-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale)))))
(-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) 2) (/.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale)))))
(.f64 1 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (*.f64 angle 1/180) (PI.f64))) x-scale))))))))
(-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale)))))
(-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) 2) (/.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale)))))
(.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale)))))))) (sqrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (*.f64 angle 1/180) (PI.f64))) x-scale)))))))))
(-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale)))))
(-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) 2) (/.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale)))))
(.f64 (.f64 (cbrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale)))))))) (cbrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))))) (cbrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale)))))))))
(-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale)))))
(-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) 2) (/.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale)))))
(/.f64 (-.f64 (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)))) (+.f64 (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)))) (.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale)))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (+.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (*.f64 angle 1/180) (PI.f64))) x-scale)))))))
(/.f64 (-.f64 (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)))) (fma.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (.f64 (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale)) (.f64 2 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))) (.f64 (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale)) (.f64 2 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))))))) (+.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (/.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale))))))
(/.f64 (-.f64 (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)))) (fma.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) 2) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale)) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) 2) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale)))))) (+.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) 2) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) 3) (pow.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))) 3)) (+.f64 (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)))) (+.f64 (+.f64 (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)))) (.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale)))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale)))))) (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale)))))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) 3) (pow.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale)))) 3)) (fma.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (+.f64 (fma.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (.f64 (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale)) (.f64 2 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))) (.f64 (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale)) (.f64 2 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale)))))) (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (/.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale))))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) 3) (pow.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) 2) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale)))) 3)) (fma.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (+.f64 (fma.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) 2) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale)) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) 2) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))))) (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) 2) (/.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale))))))))
(pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) 1)
(-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale)))))
(-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) 2) (/.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale)))))
(log.f64 (exp.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale)))))))))
(-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale)))))
(-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) 2) (/.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale)))))
(cbrt.f64 (.f64 (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale))))))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale)))))))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale)))))))))
(cbrt.f64 (.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))))) (.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))))) (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))))))))
(cbrt.f64 (.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) 2) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))))) (.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) 2) (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))))) (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) 2) (/.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale))))))))
(expm1.f64 (log1p.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale)))))))))
(-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale)))))
(-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) 2) (/.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale)))))
(exp.f64 (log.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale)))))))))
(-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale)))))
(-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) 2) (/.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale)))))
(log1p.f64 (expm1.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (.f64 (/.f64 (-.f64 b a) y-scale) (+.f64 a b)) (.f64 2 (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) x-scale)))))))))
(-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (+.f64 b a) (/.f64 (-.f64 b a) y-scale))) (.f64 2 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale)))))
(-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) a) 2) (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) 2) (/.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale)))))

localize434.0ms (0.3%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	72.3%	(/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale))))) (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))))
	61.7%	(cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))
	61.6%	(sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))
✓	55.1%	(-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))

Compiler

Compiled 1327 to 803 computations (39.5% saved)

series166.0ms (0.1%)

Counts

2 → 120

Calls

30 calls:

Time	Variable		Point	Expression
28.0ms	y-scale	@	0	(-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))
12.0ms	a	@	0	(/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale))))) (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))))
11.0ms	angle	@	0	(/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale))))) (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))))
9.0ms	x-scale	@	inf	(/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale))))) (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))))
9.0ms	x-scale	@	inf	(-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))

rewrite100.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

1068×	`add-sqr-sqrt`
1054×	`*-un-lft-identity`
1044×	`pow1`
984×	`add-exp-log`
984×	`add-log-exp`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	44	920
1	1027	920

Stop Event

1×	node limit

Counts

2 → 23

Calls

Call 1

Inputs

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

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

Outputs

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

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

simplify1.2s (0.8%)

Algorithm

1×	egg-herbie

Rules

1748×	`associate-/l*`
1204×	`+-commutative`
1088×	`associate-*r/`
920×	`associate-*l/`
896×	`*-commutative`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	1172	234657
1	4629	234651

Stop Event

1×	node limit

Counts

143 → 277

Calls

Call 1

Inputs
(-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (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) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (pow.f64 a 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (pow.f64 a 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (.f64 -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 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 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (pow.f64 a 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (.f64 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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (.f64 -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 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 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 -1/2 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.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 a 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(-.f64 (+.f64 (.f64 -1/2 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.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 a 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (+.f64 (/.f64 (.f64 (pow.f64 b 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 1/4 (.f64 (/.f64 (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.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 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 -1/2 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.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 a 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(-.f64 (+.f64 (.f64 -1/2 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.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 a 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (+.f64 (/.f64 (.f64 (pow.f64 b 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 1/4 (.f64 (/.f64 (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.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 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))
(-.f64 (+.f64 (.f64 2 (/.f64 (pow.f64 a 2) (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 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 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)))))))) (pow.f64 angle 2))) (*.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))
(-.f64 (+.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 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/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 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)))))))) (pow.f64 angle 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/2 (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 2/45 (/.f64 (.f64 (+.f64 (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale))) (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 y-scale x-scale))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 angle 4)))) (*.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))
(-.f64 (+.f64 (.f64 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/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 (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 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (.f64 1/2 (/.f64 (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))))) (+.f64 (.f64 4 (pow.f64 (+.f64 (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale))) (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale)))) 2)) (.f64 2/45 (/.f64 (.f64 (+.f64 (.f64 1/22674816000000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (.f64 y-scale x-scale))) (+.f64 (.f64 1/4534963200000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (.f64 y-scale x-scale))) (.f64 1/2267481600000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (.f64 y-scale x-scale))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 y-scale x-scale)))))) (.f64 1/2 (/.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (.f64 2/45 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (+.f64 (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 x-scale y-scale))) (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 x-scale y-scale)))) (PI.f64))) (.f64 x-scale y-scale)))))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (+.f64 (.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 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)))))))) (pow.f64 angle 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/2 (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 2/45 (/.f64 (.f64 (+.f64 (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale))) (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 y-scale x-scale))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 angle 4))))) (.f64 2 (/.f64 (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 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (+.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-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 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 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 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(-.f64 (+.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 (pow.f64 b 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)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (+.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-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 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 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 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))
(-.f64 (+.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.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 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (pow.f64 b 2)))))) (+.f64 (/.f64 (.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 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 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.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 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (pow.f64 b 2))))))) (+.f64 (/.f64 (.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 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))
(-.f64 (+.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.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 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (pow.f64 b 2)))))) (+.f64 (/.f64 (.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 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 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.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 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (pow.f64 b 2))))))) (+.f64 (/.f64 (.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 -1 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(+.f64 (.f64 -1 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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))))))
(+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 4) (.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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)))) (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (+.f64 (.f64 -1 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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)))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 6) (+.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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (.f64 (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)))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/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 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.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 (pow.f64 y-scale 4) (.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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)))) (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (+.f64 (.f64 -1 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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))))))))
(.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(-.f64 (+.f64 (.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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)))) (.f64 1/2 (/.f64 (+.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(-.f64 (+.f64 (.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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 (.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 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))))) 2)) (.f64 (pow.f64 y-scale 4) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(-.f64 (+.f64 (.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (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 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 6) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 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))))) 2)) (.f64 (pow.f64 y-scale 4) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(-.f64 (+.f64 (.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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)))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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 (.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 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (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 (+.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 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))))) 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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.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 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))
(.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 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 1/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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.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 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 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 -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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 1/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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.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 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 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 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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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))))) 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 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (.f64 -1/2 (/.f64 (.f64 (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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 1/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 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 x-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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3))))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 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))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 (pow.f64 x-scale 8) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.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 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 x-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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3))))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 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))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 (pow.f64 x-scale 8) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (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) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.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 (.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 4) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 a 4) (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (/.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 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 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1 (/.f64 (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.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 b 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (.f64 (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 b 2)))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.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 (.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 4) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 a 6) (-.f64 (.f64 1/4 (.f64 (/.f64 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (.f64 -1 (/.f64 (-.f64 (.f64 -1/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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) (.f64 -1 (/.f64 (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.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 (.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 4) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))) (pow.f64 b 2)))) (pow.f64 b 2)))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 a 4) (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (/.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 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 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1 (/.f64 (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.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 b 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (.f64 (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 b 2)))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.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 (.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 4) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 1/2 (/.f64 (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (.f64 1/2 (/.f64 (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 -1 (.f64 (pow.f64 b 2) (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 a 4))) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (.f64 1/2 (/.f64 (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 -1/4 (.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 (-.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)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1 (.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2)))) (pow.f64 b 2)))) (pow.f64 a 6))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 -1 (.f64 (pow.f64 b 2) (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 a 4))) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 1/2 (/.f64 (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (.f64 1/2 (/.f64 (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 -1 (.f64 (pow.f64 b 2) (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 a 4))) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (.f64 1/2 (/.f64 (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 -1/4 (.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 (-.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)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1 (.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2)))) (pow.f64 b 2)))) (pow.f64 a 6))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 -1 (.f64 (pow.f64 b 2) (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 a 4))) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(.f64 90 (/.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))
(+.f64 (.f64 90 (/.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 1/2 (.f64 angle (-.f64 (.f64 180 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2))))))))
(+.f64 (.f64 90 (/.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.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/2 (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 2/45 (/.f64 (.f64 (+.f64 (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale))) (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 y-scale x-scale))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 32400 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))) (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 180 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))) (.f64 1/2 (.f64 angle (-.f64 (.f64 180 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))))))
(+.f64 (.f64 90 (/.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (/.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 (/.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 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (.f64 1/2 (/.f64 (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))))) (+.f64 (.f64 4 (pow.f64 (+.f64 (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale))) (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale)))) 2)) (.f64 2/45 (/.f64 (.f64 (+.f64 (.f64 1/22674816000000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (.f64 y-scale x-scale))) (+.f64 (.f64 1/4534963200000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (.f64 y-scale x-scale))) (.f64 1/2267481600000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (.f64 y-scale x-scale))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 y-scale x-scale)))))) (.f64 1/2 (/.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (.f64 2/45 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (+.f64 (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 x-scale y-scale))) (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 x-scale y-scale)))) (PI.f64))) (.f64 x-scale y-scale)))))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2))))) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 32400 (/.f64 (.f64 (+.f64 (.f64 -1/1469328076800000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7))) (+.f64 (.f64 -1/30855889612800000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7))) (+.f64 (.f64 -1/881596846080000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7))) (.f64 -1/4407984230400000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7)))))) (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))) (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 180 (/.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/2 (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (.f64 2/45 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (+.f64 (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 x-scale y-scale))) (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 x-scale y-scale)))) (PI.f64))) (.f64 x-scale y-scale)))))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 32400 (/.f64 (.f64 (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))))) (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))) (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 180 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.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/2 (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 2/45 (/.f64 (.f64 (+.f64 (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale))) (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 y-scale x-scale))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 32400 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))) (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 180 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))) (.f64 1/2 (.f64 angle (-.f64 (.f64 180 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2))))))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 -1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (.f64 (-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 1 (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))) (pow.f64 b 2))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (.f64 (-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 1 (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (.f64 1/2 (.f64 (-.f64 (.f64 1/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 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (.f64 -1 (/.f64 (-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 1 (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))) (pow.f64 a 2)))) (pow.f64 b 4)))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (.f64 (-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 1 (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (+.f64 (.f64 1/2 (.f64 (pow.f64 b 6) (-.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 a 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))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (.f64 -1 (/.f64 (-.f64 (.f64 1/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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 1 (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)))) (pow.f64 a 2)))))) (.f64 1/2 (.f64 (-.f64 (.f64 1/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 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (.f64 -1 (/.f64 (-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 1 (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))) (pow.f64 a 2)))) (pow.f64 b 4))))))
(.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))) (pow.f64 b 4)))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/4 (.f64 (/.f64 (.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (pow.f64 a 2) (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))))) (pow.f64 b 6))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))) (pow.f64 b 4))))))
(.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))) (pow.f64 b 4)))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/4 (.f64 (/.f64 (.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (pow.f64 a 2) (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))))) (pow.f64 b 6))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))) (pow.f64 b 4))))))
(.f64 -1/2 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1/4 (/.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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.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 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (/.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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.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 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 1/8 (/.f64 (.f64 (pow.f64 y-scale 4) (.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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/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))) (.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) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (/.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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.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 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (+.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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (.f64 (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)))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/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 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.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 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 1/8 (/.f64 (.f64 (pow.f64 y-scale 4) (.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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/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))) (.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) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))))
(.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (pow.f64 b 2) (pow.f64 a 2))))) (.f64 1/2 (/.f64 (+.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))) (pow.f64 y-scale 2))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (pow.f64 b 2) (pow.f64 a 2))))) (.f64 1/2 (/.f64 (+.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 y-scale 2))) (.f64 -1/4 (/.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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 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))))) 2)) (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/8 (/.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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 6) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (pow.f64 b 2) (pow.f64 a 2))))) (.f64 1/2 (/.f64 (+.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 y-scale 2))) (.f64 -1/4 (/.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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 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))))) 2)) (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))))
(.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (pow.f64 b 2) (pow.f64 a 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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))) (pow.f64 y-scale 2))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (pow.f64 b 2) (pow.f64 a 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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 y-scale 2))) (.f64 -1/4 (/.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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (pow.f64 b 2) (pow.f64 a 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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 y-scale 2))) (+.f64 (.f64 1/8 (/.f64 (.f64 (+.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 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))))) 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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (.f64 -1/4 (/.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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))))
(.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 1/2 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (pow.f64 b 2) (pow.f64 a 2)))))) (.f64 1/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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 1/2 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (pow.f64 b 2) (pow.f64 a 2)))))) (.f64 1/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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (.f64 -1/4 (/.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2))) (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.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 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 1/2 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (pow.f64 b 2) (pow.f64 a 2)))))) (.f64 1/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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (+.f64 (.f64 -1/4 (/.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2))) (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.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 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 1/8 (/.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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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))))) 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 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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))))))))))
(.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 4) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(+.f64 (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 4) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 1/8 (/.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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 6) (.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))) 3) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(+.f64 (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 4) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 1/8 (/.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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 6) (.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))) 3) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 1/4 (/.f64 (+.f64 (.f64 -1/4 (/.f64 (.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 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 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))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 (pow.f64 x-scale 8) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))))
(.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 4) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(+.f64 (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 4) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 1/8 (/.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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 6) (.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))) 3) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(+.f64 (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 4) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 1/8 (/.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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 6) (.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))) 3) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 1/4 (/.f64 (+.f64 (.f64 -1/4 (/.f64 (.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 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 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))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 (pow.f64 x-scale 8) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))))
(+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (neg.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))))
(.f64 1 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) y-scale))))))
(.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale)))))) (sqrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) y-scale)))))))
(.f64 (.f64 (cbrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale)))))) (cbrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))))) (cbrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale)))))))
(/.f64 (-.f64 (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale)))))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) 3) (pow.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale)))) 3)) (+.f64 (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (+.f64 (.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) y-scale))))))))
(pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) 1)
(log.f64 (exp.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale)))))))
(cbrt.f64 (.f64 (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale)))))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale)))))))
(expm1.f64 (log1p.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale)))))))
(exp.f64 (log.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale)))))))
(log1p.f64 (expm1.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale)))))))
(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))) (/.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale)))) (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))))
(.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (/.f64 1 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))))
(.f64 1 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))))
(.f64 (sqrt.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))))) (sqrt.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a))))))))
(.f64 (.f64 (cbrt.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))))) (cbrt.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))))) (cbrt.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a))))))))
(pow.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))))) 1)
(log.f64 (exp.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a))))))))
(cbrt.f64 (.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))) (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))))) (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a))))))))
(expm1.f64 (log1p.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a))))))))
(exp.f64 (log.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a))))))))
(log1p.f64 (expm1.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a))))))))

Outputs
(-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (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) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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)))) (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 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (.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 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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (pow.f64 a 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(-.f64 (fma.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 -4 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -4 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (.f64 a a) (/.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 (fma.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (.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 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))))))))) (.f64 a a) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (pow.f64 a 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (.f64 -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 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 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(-.f64 (+.f64 (fma.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 -4 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -4 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (.f64 a a) (/.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 (pow.f64 a 4) (.f64 (-.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -4 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))))) 2)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 (.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 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (.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 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))))))))) (.f64 a a) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.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 4) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (pow.f64 a 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (.f64 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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)))) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (.f64 -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 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 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(-.f64 (+.f64 (fma.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 -4 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -4 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (.f64 a a) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 (pow.f64 a 6) (fma.f64 -4 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -4 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (-.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 -4 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -4 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 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 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (.f64 -1/2 (.f64 (pow.f64 a 4) (.f64 (-.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -4 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))))) 2)) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 (.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 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (.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 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))))))))) (.f64 a a) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (fma.f64 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.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 6) (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))))))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))))))) 2)))))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.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 4) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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/2 (.f64 (sqrt.f64 (/.f64 1 (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))))))
(-.f64 (+.f64 (.f64 -1/2 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.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 a 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(-.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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (fma.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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))))))) 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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/2 (.f64 (sqrt.f64 (/.f64 1 (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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 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 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))))))) 2)) (.f64 a a))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))))
(-.f64 (+.f64 (.f64 -1/2 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.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 a 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (+.f64 (/.f64 (.f64 (pow.f64 b 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 1/4 (.f64 (/.f64 (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.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 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(-.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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (fma.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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))))))) 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))) (fma.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 (.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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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))))))) 2)) (pow.f64 a 4)) (/.f64 (fma.f64 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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)))))) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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/2 (.f64 (sqrt.f64 (/.f64 1 (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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 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 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))))))) 2)) (.f64 a a))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a 4)) (/.f64 (fma.f64 -8 (.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 (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))))
(.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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/2 (.f64 (sqrt.f64 (/.f64 1 (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))))))
(-.f64 (+.f64 (.f64 -1/2 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.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 a 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(-.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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (fma.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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))))))) 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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/2 (.f64 (sqrt.f64 (/.f64 1 (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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 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 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))))))) 2)) (.f64 a a))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))))
(-.f64 (+.f64 (.f64 -1/2 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.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 a 2)) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (+.f64 (/.f64 (.f64 (pow.f64 b 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 1/4 (.f64 (/.f64 (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.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 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))
(-.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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (fma.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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))))))) 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))) (fma.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 (.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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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))))))) 2)) (pow.f64 a 4)) (/.f64 (fma.f64 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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)))))) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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/2 (.f64 (sqrt.f64 (/.f64 1 (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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 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 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))))))) 2)) (.f64 a a))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a 4)) (/.f64 (fma.f64 -8 (.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 (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))))
(-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))
(.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (*.f64 x-scale x-scale))))
(.f64 2 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 b (/.f64 (*.f64 x-scale x-scale) b))))
(-.f64 (+.f64 (.f64 2 (/.f64 (pow.f64 a 2) (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 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 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)))))))) (pow.f64 angle 2))) (*.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))
(+.f64 (fma.f64 2 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))))) (.f64 angle angle))) (.f64 -2 (/.f64 (.f64 b b) (.f64 x-scale x-scale))))
(+.f64 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b)))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b))))) (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (.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 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))))) (.f64 angle angle)) (.f64 2 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 b (/.f64 (.f64 x-scale x-scale) b)))))
(-.f64 (+.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 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/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 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)))))))) (pow.f64 angle 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/2 (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 2/45 (/.f64 (.f64 (+.f64 (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale))) (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 y-scale x-scale))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 angle 4)))) (*.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))
(+.f64 (fma.f64 2 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (fma.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))))) (.f64 angle angle) (.f64 (-.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/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 2/45 (.f64 (/.f64 (.f64 (.f64 (/.f64 (-.f64 (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))) (pow.f64 angle 4)))) (.f64 -2 (/.f64 (.f64 b b) (.f64 x-scale x-scale))))
(+.f64 (fma.f64 (-.f64 (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b)))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b))))) (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (.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 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))))) (.f64 angle angle) (.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 4)) (.f64 y-scale y-scale)) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)))) (fma.f64 -1/3149280000 (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 4)) (.f64 y-scale y-scale)) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))))) (fma.f64 2/45 (.f64 (/.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 3) x-scale))) (/.f64 y-scale -1/8748000)) (/.f64 (PI.f64) (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)))) (fma.f64 -1/3149280000 (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 4)) (.f64 y-scale y-scale)) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))))) (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b))))) (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (.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 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a))))) 2)) (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)))))) (pow.f64 angle 4))) (.f64 2 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 b (/.f64 (.f64 x-scale x-scale) b)))))
(-.f64 (+.f64 (.f64 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/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 (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 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (.f64 1/2 (/.f64 (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))))) (+.f64 (.f64 4 (pow.f64 (+.f64 (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale))) (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale)))) 2)) (.f64 2/45 (/.f64 (.f64 (+.f64 (.f64 1/22674816000000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (.f64 y-scale x-scale))) (+.f64 (.f64 1/4534963200000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (.f64 y-scale x-scale))) (.f64 1/2267481600000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (.f64 y-scale x-scale))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 y-scale x-scale)))))) (.f64 1/2 (/.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (.f64 2/45 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (+.f64 (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 x-scale y-scale))) (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 x-scale y-scale)))) (PI.f64))) (.f64 x-scale y-scale)))))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))))) (+.f64 (.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 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)))))))) (pow.f64 angle 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/2 (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 2/45 (/.f64 (.f64 (+.f64 (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale))) (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 y-scale x-scale))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 angle 4))))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))
(+.f64 (fma.f64 2 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (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 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (+.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 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))))) (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a)))))) (fma.f64 4 (pow.f64 (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) (/.f64 (pow.f64 (PI.f64) 3) y-scale)) -1/8748000) 2) (.f64 2/45 (.f64 (/.f64 (fma.f64 1/22674816000000 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (pow.f64 (PI.f64) 5) x-scale)) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (pow.f64 (PI.f64) 5) x-scale)) 1/1511654400000)) y-scale) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) x-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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (+.f64 (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)) (.f64 2/45 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) (/.f64 (.f64 (PI.f64) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) (/.f64 (pow.f64 (PI.f64) 3) y-scale)) -1/8748000)) y-scale))))) (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 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) 2)) (/.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) 2) (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))) (fma.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))))) (.f64 angle angle) (.f64 (-.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/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 2/45 (.f64 (/.f64 (.f64 (.f64 (/.f64 (-.f64 (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))) (pow.f64 angle 4))))) (.f64 -2 (/.f64 (.f64 b b) (.f64 x-scale x-scale))))
(+.f64 (fma.f64 (pow.f64 angle 6) (+.f64 (/.f64 b (/.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) b)) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (+.f64 (/.f64 b (/.f64 (/.f64 x-scale (/.f64 (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000) x-scale)) b)) (+.f64 (/.f64 a (/.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) a)) (.f64 1/2 (/.f64 (+.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a))) (+.f64 (/.f64 b (/.f64 (/.f64 x-scale (/.f64 (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000) x-scale)) b)) (-.f64 (-.f64 (/.f64 a (/.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) a)) (/.f64 b (/.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) b))) (/.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 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)))) (fma.f64 -1/3149280000 (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 4)) (.f64 y-scale y-scale)) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)))))) (fma.f64 4 (pow.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 3) x-scale))) -1/8748000) 2) (.f64 2/45 (.f64 (/.f64 (fma.f64 1/22674816000000 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 5) x-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 5) x-scale))) 1/1511654400000)) y-scale) (/.f64 (PI.f64) (/.f64 x-scale (-.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 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b))))) (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (.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 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a))) 2) (-.f64 (fma.f64 (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)))) (fma.f64 -1/3149280000 (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 4)) (.f64 y-scale y-scale)) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))))) (+.f64 (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)))) (fma.f64 -1/3149280000 (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 4)) (.f64 y-scale y-scale)) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))))) (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b))))) 2)) (.f64 2/45 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) (/.f64 (PI.f64) (/.f64 y-scale (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 3) x-scale))) -1/8748000))))))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b))))) (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (.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 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a))))) 2)))))) (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a))))))))) (fma.f64 (-.f64 (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b)))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b))))) (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (.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 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))))) (.f64 angle angle) (.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 4)) (.f64 y-scale y-scale)) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)))) (fma.f64 -1/3149280000 (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 4)) (.f64 y-scale y-scale)) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))))) (fma.f64 2/45 (.f64 (/.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 3) x-scale))) (/.f64 y-scale -1/8748000)) (/.f64 (PI.f64) (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)))) (fma.f64 -1/3149280000 (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 4)) (.f64 y-scale y-scale)) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))))) (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b))))) (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (.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 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a))))) 2)) (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)))))) (pow.f64 angle 4)))) (.f64 2 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 b (/.f64 (*.f64 x-scale x-scale) 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 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(+.f64 (/.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale)) (+.f64 (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 (.f64 (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 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale 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 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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (*.f64 a a) y-scale)))))) 2)))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(+.f64 (/.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale)) (+.f64 (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 (.f64 (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 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale 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 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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (*.f64 a a) y-scale)))))) 2)))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(+.f64 (/.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale)) (+.f64 (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 (.f64 (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 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale 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 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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (*.f64 a a) y-scale)))))) 2)))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(+.f64 (/.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale)) (+.f64 (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 (.f64 (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 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale 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 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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (*.f64 a a) y-scale)))))) 2)))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(+.f64 (/.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale)) (+.f64 (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 (.f64 (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 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale 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 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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (*.f64 a a) y-scale)))))) 2)))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(+.f64 (/.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale)) (+.f64 (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 (.f64 (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 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale 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 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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (*.f64 a a) y-scale)))))) 2)))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(+.f64 (/.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale)) (+.f64 (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 (.f64 (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 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale 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 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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (*.f64 a a) y-scale)))))) 2)))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(+.f64 (/.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale)) (+.f64 (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 (.f64 (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 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale 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 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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (*.f64 a a) y-scale)))))) 2)))))))
(-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)))))))))
(-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(-.f64 (fma.f64 (-.f64 (/.f64 (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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)))) (.f64 b b) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))))
(-.f64 (fma.f64 (-.f64 (/.f64 (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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 b b) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))))))))
(-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (+.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-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 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 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 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(-.f64 (fma.f64 (-.f64 (/.f64 (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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)))) (.f64 b b) (fma.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 (pow.f64 b 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)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 a a)) (.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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))))
(-.f64 (fma.f64 (-.f64 (/.f64 (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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 b b) (fma.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) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))))))) (.f64 (pow.f64 b 4) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-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 (pow.f64 b 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)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (+.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-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 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 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 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(-.f64 (fma.f64 1/4 (/.f64 (.f64 (.f64 (.f64 (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (pow.f64 b 6)) (-.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 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (fma.f64 (-.f64 (/.f64 (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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)))) (.f64 b b) (fma.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 (pow.f64 b 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)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 a a)) (.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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))))
(-.f64 (fma.f64 1/4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))))))) (/.f64 (.f64 (pow.f64 b 6) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))) 2))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))))) (fma.f64 (-.f64 (/.f64 (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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 b b) (fma.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) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))))))) (.f64 (pow.f64 b 4) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)))))))))
(.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 b b) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-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 b b) (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))
(-.f64 (fma.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.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 1/2 (sqrt.f64 (/.f64 1 (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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))))
(-.f64 (fma.f64 (.f64 b b) (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 y-scale (/.f64 (.f64 a a) y-scale)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)))))))))))
(-.f64 (+.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.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 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (pow.f64 b 2)))))) (+.f64 (/.f64 (.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 (fma.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (.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 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 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (-.f64 (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (pow.f64 (.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 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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2)))) (.f64 b b)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 (.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 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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))))
(+.f64 (fma.f64 (.f64 b b) (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (.f64 -1/2 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))))) 2)))) (.f64 b b))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale))))))))))))
(-.f64 (+.f64 (.f64 1/4 (.f64 (/.f64 (.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.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 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (pow.f64 b 2))))))) (+.f64 (/.f64 (.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 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 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 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (-.f64 (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (pow.f64 (.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 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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (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 (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (pow.f64 b 4)))) (+.f64 (fma.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (.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 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 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (-.f64 (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (pow.f64 (.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 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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2)))) (.f64 b b))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 (.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 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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))))
(-.f64 (fma.f64 1/4 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))))) 2)))) (/.f64 (pow.f64 b 4) (/.f64 (fma.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (.f64 b b) (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 y-scale (/.f64 (.f64 a a) y-scale)))) (.f64 -1/2 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))))) 2)))) (.f64 b b))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)))))))))))
(.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 b b) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-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 b b) (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))
(-.f64 (fma.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.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 1/2 (sqrt.f64 (/.f64 1 (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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))))
(-.f64 (fma.f64 (.f64 b b) (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 y-scale (/.f64 (.f64 a a) y-scale)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)))))))))))
(-.f64 (+.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.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 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (pow.f64 b 2)))))) (+.f64 (/.f64 (.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 (fma.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (.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 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 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (-.f64 (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (pow.f64 (.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 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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2)))) (.f64 b b)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 (.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 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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))))
(+.f64 (fma.f64 (.f64 b b) (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (.f64 -1/2 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))))) 2)))) (.f64 b b))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale))))))))))))
(-.f64 (+.f64 (.f64 1/4 (.f64 (/.f64 (.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.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 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (pow.f64 b 2))))))) (+.f64 (/.f64 (.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 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 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 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (-.f64 (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (pow.f64 (.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 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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (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 (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (pow.f64 b 4)))) (+.f64 (fma.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (.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 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 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (-.f64 (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (pow.f64 (.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 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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2)))) (.f64 b b))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 (.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 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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))))
(-.f64 (fma.f64 1/4 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))))) 2)))) (/.f64 (pow.f64 b 4) (/.f64 (fma.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (.f64 b b) (-.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 y-scale (/.f64 (.f64 a a) y-scale)))) (.f64 -1/2 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))))) 2)))) (.f64 b b))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)))))))))))
(.f64 -1 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))
(neg.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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))))))
(neg.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))))
(+.f64 (.f64 -1 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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))))))
(fma.f64 -1 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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/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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 4 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.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 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 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 1/4 (/.f64 (.f64 (pow.f64 y-scale 4) (.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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)))) (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (+.f64 (.f64 -1 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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)))))))
(fma.f64 1/4 (.f64 (/.f64 (pow.f64 y-scale 4) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.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 (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 (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 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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))))) 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))) (fma.f64 -1 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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/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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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/4 (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 4 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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)) (pow.f64 y-scale 4))) (fma.f64 -1 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 4 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.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 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 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 1/2 (/.f64 (.f64 (pow.f64 y-scale 6) (+.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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (.f64 (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)))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/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 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.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 (pow.f64 y-scale 4) (.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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)))) (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (+.f64 (.f64 -1 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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))))))))
(fma.f64 1/2 (/.f64 (pow.f64 y-scale 6) (/.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))) (fma.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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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)) (/.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 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 -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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 (.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))))))))) (pow.f64 (.f64 1/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 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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))))) 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)))) (fma.f64 1/4 (.f64 (/.f64 (pow.f64 y-scale 4) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.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 (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 (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 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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))))) 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))) (fma.f64 -1 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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/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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 (pow.f64 y-scale 6) (/.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))) (fma.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 4 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.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 (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 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 4 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 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) (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))))))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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)))) (fma.f64 1/4 (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 4 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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)) (pow.f64 y-scale 4))) (fma.f64 -1 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 4 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.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 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 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 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(neg.f64 (.f64 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))))))
(neg.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))))
(-.f64 (+.f64 (.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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)))) (.f64 1/2 (/.f64 (+.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (fma.f64 -1 (.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 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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale)))) (.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale))))) (/.f64 1/2 (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 4 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))))))
(-.f64 (+.f64 (.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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 (.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 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))))) 2)) (.f64 (pow.f64 y-scale 4) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (fma.f64 -1 (.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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (.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 (.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 -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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 (+.f64 (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale))))) (.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 (.f64 (pow.f64 (cos.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))) 2)) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))) (pow.f64 y-scale 4))))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 4 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 a a))))))))
(-.f64 (+.f64 (.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (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 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 6) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 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))))) 2)) (.f64 (pow.f64 y-scale 4) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))))
(+.f64 (fma.f64 -1 (.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 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 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (+.f64 (/.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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (.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 (.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 -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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (fma.f64 1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 4 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))) 2)) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))) (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale))) (.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 (.f64 (pow.f64 (cos.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))) 2)) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))) (pow.f64 y-scale 4)))))))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 4 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))))))
(.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(neg.f64 (.f64 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))))))
(neg.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))))
(-.f64 (+.f64 (.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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)))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))
(+.f64 (fma.f64 -1 (.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 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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale)))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 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 (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 a a))))))))
(-.f64 (+.f64 (.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 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 (.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 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))
(+.f64 (fma.f64 -1 (.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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 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 (+.f64 (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale))))) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 4 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))) 2)) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))) (pow.f64 y-scale 4))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 a a))))))))
(-.f64 (+.f64 (.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (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 (+.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 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))))) 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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.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 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))))))
(+.f64 (fma.f64 -1 (.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 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 (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 (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 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 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 (fma.f64 -1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (fma.f64 1/4 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 4 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))) (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))) 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 (.f64 (pow.f64 (cos.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale))) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 4 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))) 2)) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))) (pow.f64 y-scale 4)))))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))))))
(.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 x-scale x-scale)))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 x-scale x-scale)))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 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 1/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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (+.f64 (/.f64 (.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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 x-scale x-scale)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale))) (neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 x-scale x-scale)))) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a)))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.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 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 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 -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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 1/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 (/.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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (fma.f64 -1 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 x-scale x-scale)) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (.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/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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale))) (-.f64 (fma.f64 -1 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 x-scale x-scale)) (.f64 -1/2 (/.f64 (.f64 x-scale x-scale) (/.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 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.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/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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a))))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.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 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 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 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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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))))) 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 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (.f64 -1/2 (/.f64 (.f64 (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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 1/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 (/.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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (fma.f64 -1 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 x-scale x-scale)) (fma.f64 1/4 (/.f64 (pow.f64 x-scale 4) (/.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)) (.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 -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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (.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/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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale))) (-.f64 (fma.f64 -1 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 x-scale x-scale)) (fma.f64 1/4 (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) 2))) (/.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))) (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 x-scale 4))) (.f64 -1/2 (/.f64 (.f64 x-scale x-scale) (/.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 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.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/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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))))
(.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)))
(neg.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))))) (*.f64 x-scale x-scale)))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 x-scale 2))))
(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 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (pow.f64 x-scale 4))) (neg.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))))) (.f64 x-scale x-scale))))
(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 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (pow.f64 x-scale 4))) (neg.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))))) (.f64 x-scale x-scale))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 x-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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3))))))
(fma.f64 -1/2 (/.f64 (-.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 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (pow.f64 x-scale 4))) (fma.f64 -1 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))))) (.f64 x-scale x-scale)) (.f64 1/4 (.f64 (/.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) 2)) (pow.f64 x-scale 6)) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (.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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 3))))))
(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 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (pow.f64 x-scale 4))) (fma.f64 -1 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))))) (.f64 x-scale x-scale)) (.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 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2)) (pow.f64 x-scale 6)) (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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)))))) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 3))))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 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))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 (pow.f64 x-scale 8) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3)))))))
(fma.f64 -1/2 (/.f64 (-.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 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (pow.f64 x-scale 4))) (fma.f64 -1 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))))) (.f64 x-scale x-scale)) (fma.f64 1/2 (/.f64 (fma.f64 -1/4 (/.f64 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (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 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) 2))) (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (.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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 4)) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) 2)) (+.f64 (/.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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (pow.f64 x-scale 8))) (.f64 1/4 (.f64 (/.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) 2)) (pow.f64 x-scale 6)) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (.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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (*.f64 y-scale y-scale))) 3)))))))
(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 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (pow.f64 x-scale 4))) (fma.f64 -1 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))))) (.f64 x-scale x-scale)) (fma.f64 1/2 (/.f64 (fma.f64 -1/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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 4) (.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2))))) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (pow.f64 x-scale 8))) (.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 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2)) (pow.f64 x-scale 6)) (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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)))))) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 3)))))))
(.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)))
(neg.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))))) (*.f64 x-scale x-scale)))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 x-scale 2))))
(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 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (pow.f64 x-scale 4))) (neg.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))))) (.f64 x-scale x-scale))))
(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 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (pow.f64 x-scale 4))) (neg.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))))) (.f64 x-scale x-scale))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 x-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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3))))))
(fma.f64 -1/2 (/.f64 (-.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 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (pow.f64 x-scale 4))) (fma.f64 -1 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))))) (.f64 x-scale x-scale)) (.f64 1/4 (.f64 (/.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) 2)) (pow.f64 x-scale 6)) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (.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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 3))))))
(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 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (pow.f64 x-scale 4))) (fma.f64 -1 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))))) (.f64 x-scale x-scale)) (.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 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2)) (pow.f64 x-scale 6)) (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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)))))) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 3))))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (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 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (pow.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 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))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 (pow.f64 x-scale 8) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 3)))))))
(fma.f64 -1/2 (/.f64 (-.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 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (pow.f64 x-scale 4))) (fma.f64 -1 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))))) (.f64 x-scale x-scale)) (fma.f64 1/2 (/.f64 (fma.f64 -1/4 (/.f64 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (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 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) 2))) (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (.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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 4)) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) 2)) (+.f64 (/.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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (pow.f64 x-scale 8))) (.f64 1/4 (.f64 (/.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) 2)) (pow.f64 x-scale 6)) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (.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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (*.f64 y-scale y-scale))) 3)))))))
(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 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (pow.f64 x-scale 4))) (fma.f64 -1 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))))) (.f64 x-scale x-scale)) (fma.f64 1/2 (/.f64 (fma.f64 -1/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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 4) (.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2))))) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (pow.f64 x-scale 8))) (.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 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2)) (pow.f64 x-scale 6)) (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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)))))) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 3)))))))
(.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 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 (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) (pow.f64 b 4)) (.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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))
(.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.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 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.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 (.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 4) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(.f64 1/2 (+.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (fma.f64 -1 (/.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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (pow.f64 b 4)))) (+.f64 (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 b b) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -4 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))))))) (/.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 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 (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) (pow.f64 b 4)) (.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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))))))))
(.f64 1/2 (+.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.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 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (.f64 a a) (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 4)))) (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 b b) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.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 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (*.f64 b b) x-scale))))))))))))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 a 4) (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (/.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 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 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1 (/.f64 (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.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 b 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (.f64 (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 b 2)))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.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 (.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 4) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.f64 1/2 (.f64 (pow.f64 a 4) (-.f64 (.f64 -1/2 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -4 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))))) 2))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))) (neg.f64 (/.f64 (-.f64 (/.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (fma.f64 -1 (/.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 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 (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) (pow.f64 b 4)) (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (.f64 (pow.f64 b 4) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (.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 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 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -4 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 b b) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))))) (.f64 b b))))) (.f64 1/2 (+.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (fma.f64 -1 (/.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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (pow.f64 b 4)))) (+.f64 (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 b b) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -4 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))))))) (/.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 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 (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) (pow.f64 b 4)) (.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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64)))))))))
(fma.f64 1/2 (.f64 (pow.f64 a 4) (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.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 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (neg.f64 (/.f64 (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.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 b 4) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 b b) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 b b))))) (.f64 1/2 (+.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.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 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (.f64 a a) (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 4)))) (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 b b) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.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 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (*.f64 b b) x-scale)))))))))))))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 a 6) (-.f64 (.f64 1/4 (.f64 (/.f64 (.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2))) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))) (.f64 -1 (/.f64 (-.f64 (.f64 -1/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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) (.f64 -1 (/.f64 (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.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 (.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 4) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))) (pow.f64 b 2)))) (pow.f64 b 2)))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 a 4) (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (/.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 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 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) 2)) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1 (/.f64 (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.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 b 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (.f64 (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2)))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 b 2)))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.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 (.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 4) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (/.f64 (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(fma.f64 1/2 (.f64 (pow.f64 a 6) (-.f64 (.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 (fma.f64 -4 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -4 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (.f64 b b)) (/.f64 (-.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 -4 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -4 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2)) (.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (fma.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))))))) (neg.f64 (/.f64 (-.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 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (/.f64 (-.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 -4 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -4 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2)) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))) (neg.f64 (/.f64 (-.f64 (/.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (fma.f64 -1 (/.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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (pow.f64 b 4)))) (+.f64 (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 b b) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -4 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))))))) (.f64 b b)))) (.f64 b b))))) (fma.f64 1/2 (.f64 (pow.f64 a 4) (-.f64 (.f64 -1/2 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -4 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))))) 2))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))) (neg.f64 (/.f64 (-.f64 (/.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (fma.f64 -1 (/.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 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 (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) (pow.f64 b 4)) (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (.f64 (pow.f64 b 4) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (.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 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 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -4 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 b b) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))))) (.f64 b b))))) (.f64 1/2 (+.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (fma.f64 -1 (/.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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (pow.f64 b 4)))) (+.f64 (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 b b) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -4 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))))))) (/.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 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 (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) (pow.f64 b 4)) (.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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))))))
(fma.f64 1/2 (.f64 (pow.f64 a 6) (-.f64 (.f64 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (.f64 (/.f64 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))))))) (.f64 b b)) (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))))))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))))))) (neg.f64 (/.f64 (-.f64 (.f64 -1/2 (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))))))) 2)) (/.f64 (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))))) (neg.f64 (/.f64 (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 4)))) (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 b b) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.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 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))))))))))))) (.f64 b b)))) (.f64 b b))))) (fma.f64 1/2 (.f64 (pow.f64 a 4) (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.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 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (neg.f64 (/.f64 (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.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 b 4) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 b b) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 b b))))) (.f64 1/2 (+.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.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 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (.f64 a a) (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 4)))) (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 b b) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.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 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))))))))))))))))))
(.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))))))
(.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 1/2 (/.f64 (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.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))) (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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 (/.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)) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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))))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (/.f64 (.f64 b b) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 a a)) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64)))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 b (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b)))) (.f64 a a)) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (.f64 1/2 (/.f64 (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 -1 (.f64 (pow.f64 b 2) (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 a 4))) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.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))) (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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 (/.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)) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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))))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (/.f64 (.f64 b b) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 a a)) (fma.f64 1/2 (/.f64 (-.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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (fma.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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))))))) 2)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.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))) (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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 (/.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)) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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))))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (/.f64 (.f64 b b) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))))) (pow.f64 a 4)) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 b (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b)))) (.f64 a a)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))))))) 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 b (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))))))) (pow.f64 a 4)) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (.f64 1/2 (/.f64 (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 -1/4 (.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 (-.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)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1 (.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2)))) (pow.f64 b 2)))) (pow.f64 a 6))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 -1 (.f64 (pow.f64 b 2) (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 a 4))) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.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))) (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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 (/.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)) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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))))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (/.f64 (.f64 b b) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 a a)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 (.f64 -1/4 (sqrt.f64 (/.f64 1 (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 (.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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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))))))) 2)) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (.f64 1/2 (/.f64 (.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 (.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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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))))))) 2)) (sqrt.f64 (/.f64 1 (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.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))) (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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 (/.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)) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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))))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (/.f64 (.f64 b b) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))))))) (pow.f64 a 6)) (fma.f64 1/2 (/.f64 (-.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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (fma.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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))))))) 2)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.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))) (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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 (/.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)) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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))))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (/.f64 (.f64 b b) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))))) (pow.f64 a 4)) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 b (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b)))) (.f64 a a)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))))))) 2)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) (/.f64 (fma.f64 -8 (.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 (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))))))) 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 b (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b)))))))))) (pow.f64 a 6)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))))))) 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 b (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))))))) (pow.f64 a 4)) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))))))
(.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 1/2 (/.f64 (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.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))) (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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 (/.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)) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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))))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (/.f64 (.f64 b b) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 a a)) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64)))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 b (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b)))) (.f64 a a)) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (.f64 1/2 (/.f64 (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 -1 (.f64 (pow.f64 b 2) (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 a 4))) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.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))) (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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 (/.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)) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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))))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (/.f64 (.f64 b b) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 a a)) (fma.f64 1/2 (/.f64 (-.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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (fma.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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))))))) 2)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.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))) (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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 (/.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)) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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))))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (/.f64 (.f64 b b) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))))) (pow.f64 a 4)) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 b (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b)))) (.f64 a a)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))))))) 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 b (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))))))) (pow.f64 a 4)) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (.f64 1/2 (/.f64 (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 -1/4 (.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 (-.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)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1 (.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2)))) (pow.f64 b 2)))) (pow.f64 a 6))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 -1 (.f64 (pow.f64 b 2) (-.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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (pow.f64 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 a 4))) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.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))) (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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 (/.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)) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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))))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (/.f64 (.f64 b b) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 a a)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 (.f64 -1/4 (sqrt.f64 (/.f64 1 (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 (.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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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))))))) 2)) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (.f64 1/2 (/.f64 (.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 (.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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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))))))) 2)) (sqrt.f64 (/.f64 1 (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.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))) (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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 (/.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)) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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))))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (/.f64 (.f64 b b) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))))))) (pow.f64 a 6)) (fma.f64 1/2 (/.f64 (-.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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (fma.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 b 4)) (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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))))))) 2)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.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))) (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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 (/.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)) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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))))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (/.f64 (.f64 b b) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))))) (pow.f64 a 4)) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))))
(fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 b (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b)))) (.f64 a a)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))))))) 2)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) (/.f64 (fma.f64 -8 (.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 (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))))))) 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 b (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b)))))))))) (pow.f64 a 6)) (fma.f64 1/2 (/.f64 (-.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))))))) 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -8 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 b (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))))))) (pow.f64 a 4)) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(.f64 90 (/.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))
(.f64 90 (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))
(.f64 90 (/.f64 2 (/.f64 (.f64 (.f64 angle (-.f64 (.f64 b b) (.f64 a a))) (PI.f64)) (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 b (/.f64 (*.f64 x-scale x-scale) b))))))
(+.f64 (.f64 90 (/.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 1/2 (.f64 angle (-.f64 (.f64 180 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2))))))))
(fma.f64 90 (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 1/2 angle) (+.f64 (/.f64 (.f64 180 (-.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale)))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 -32400 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))) (pow.f64 (PI.f64) 2)))))))
(fma.f64 90 (/.f64 2 (/.f64 (.f64 (.f64 angle (-.f64 (.f64 b b) (.f64 a a))) (PI.f64)) (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))))) (.f64 (.f64 1/2 angle) (+.f64 (.f64 180 (/.f64 (-.f64 (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b)))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b))))) (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (.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 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -32400 (.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) -1/8748000)) (/.f64 (.f64 2 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 b (/.f64 (*.f64 x-scale x-scale) b)))) (pow.f64 (PI.f64) 2)))))))
(+.f64 (.f64 90 (/.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.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/2 (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 2/45 (/.f64 (.f64 (+.f64 (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale))) (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 y-scale x-scale))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 32400 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))) (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 180 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))) (.f64 1/2 (.f64 angle (-.f64 (.f64 180 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))))))
(fma.f64 90 (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 1/2 (+.f64 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (-.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/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 2/45 (.f64 (/.f64 (.f64 (.f64 (/.f64 (-.f64 (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 32400 (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (fma.f64 1/22674816000000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/1511654400000)))) (.f64 180 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (/.f64 (.f64 180 (-.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale)))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 -32400 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (pow.f64 (PI.f64) 2))))) (PI.f64))))))) (.f64 angle (+.f64 (/.f64 (.f64 180 (-.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale)))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 -32400 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))) (pow.f64 (PI.f64) 2)))))))))
(fma.f64 90 (/.f64 2 (/.f64 (.f64 (.f64 angle (-.f64 (.f64 b b) (.f64 a a))) (PI.f64)) (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))))) (.f64 1/2 (+.f64 (.f64 angle (+.f64 (.f64 180 (/.f64 (-.f64 (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b)))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b))))) (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (.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 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -32400 (.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) -1/8748000)) (/.f64 (.f64 2 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 b (/.f64 (.f64 x-scale x-scale) b)))) (pow.f64 (PI.f64) 2)))))) (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 4)) (.f64 y-scale y-scale)) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)))) (fma.f64 -1/3149280000 (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 4)) (.f64 y-scale y-scale)) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))))) (fma.f64 2/45 (.f64 (/.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 3) x-scale))) (/.f64 y-scale -1/8748000)) (/.f64 (PI.f64) (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)))) (fma.f64 -1/3149280000 (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 4)) (.f64 y-scale y-scale)) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))))) (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b))))) (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (.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 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a))))) 2)) (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 32400 (.f64 (/.f64 2 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))))) (/.f64 (fma.f64 1/22674816000000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/1511654400000)) (pow.f64 (PI.f64) 2))) (.f64 180 (.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000)) (/.f64 (+.f64 (.f64 180 (/.f64 (-.f64 (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b)))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b))))) (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (.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 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -32400 (.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) -1/8748000)) (/.f64 (.f64 2 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 b (/.f64 (.f64 x-scale x-scale) b)))) (pow.f64 (PI.f64) 2))))) (PI.f64))))))))))
(+.f64 (.f64 90 (/.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (/.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 (/.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 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (.f64 1/2 (/.f64 (-.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))))) (+.f64 (.f64 4 (pow.f64 (+.f64 (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale))) (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale)))) 2)) (.f64 2/45 (/.f64 (.f64 (+.f64 (.f64 1/22674816000000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (.f64 y-scale x-scale))) (+.f64 (.f64 1/4534963200000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (.f64 y-scale x-scale))) (.f64 1/2267481600000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)) (.f64 y-scale x-scale))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 y-scale x-scale)))))) (.f64 1/2 (/.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (.f64 2/45 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (+.f64 (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 x-scale y-scale))) (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 x-scale y-scale)))) (PI.f64))) (.f64 x-scale y-scale)))))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2))))) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 32400 (/.f64 (.f64 (+.f64 (.f64 -1/1469328076800000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7))) (+.f64 (.f64 -1/30855889612800000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7))) (+.f64 (.f64 -1/881596846080000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7))) (.f64 -1/4407984230400000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7)))))) (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))) (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 180 (/.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/2 (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2) (.f64 2/45 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (+.f64 (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 x-scale y-scale))) (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 x-scale y-scale)))) (PI.f64))) (.f64 x-scale y-scale)))))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 32400 (/.f64 (.f64 (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))))) (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))) (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 180 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))))) (+.f64 (.f64 1/2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.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/2 (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2))))) (+.f64 (.f64 2/45 (/.f64 (.f64 (+.f64 (.f64 -1/11664000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale))) (.f64 -1/34992000 (/.f64 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)) (.f64 y-scale x-scale)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 y-scale x-scale))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) 2)) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 32400 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))) (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 180 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))) (.f64 1/2 (.f64 angle (-.f64 (.f64 180 (/.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 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 2 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))) (.f64 2 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2))))))))))
(fma.f64 90 (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 1/2 (.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (+.f64 (+.f64 (/.f64 (.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 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))))) (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a)))))) (fma.f64 4 (pow.f64 (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) (/.f64 (pow.f64 (PI.f64) 3) y-scale)) -1/8748000) 2) (.f64 2/45 (.f64 (/.f64 (fma.f64 1/22674816000000 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (pow.f64 (PI.f64) 5) x-scale)) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) y-scale) (/.f64 (pow.f64 (PI.f64) 5) x-scale)) 1/1511654400000)) y-scale) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) x-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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (+.f64 (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)) (.f64 2/45 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) (/.f64 (.f64 (PI.f64) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) (/.f64 (pow.f64 (PI.f64) 3) y-scale)) -1/8748000)) y-scale))))) (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 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) 2)) (/.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) 2) (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 180 (/.f64 (+.f64 (/.f64 (.f64 180 (-.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale)))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 -32400 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (pow.f64 (PI.f64) 2))))) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 1/22674816000000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/1511654400000)))) (fma.f64 32400 (.f64 (/.f64 (fma.f64 -1/1469328076800000000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 7)) (fma.f64 -1/30855889612800000000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 7)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 7)) -1/734664038400000000))) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (pow.f64 (PI.f64) 2))) (.f64 180 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (-.f64 (/.f64 (.f64 180 (-.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/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (+.f64 (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)) (.f64 2/45 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) (/.f64 (.f64 (PI.f64) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) (/.f64 (pow.f64 (PI.f64) 3) y-scale)) -1/8748000)) y-scale))))) (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 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 32400 (.f64 (/.f64 (fma.f64 1/2267481600000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/3779136000000)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (pow.f64 (PI.f64) 2))) (.f64 180 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (/.f64 (.f64 180 (-.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale)))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 -32400 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (pow.f64 (PI.f64) 2))))) (PI.f64)))))) (PI.f64)))))))) (.f64 1/2 (+.f64 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (-.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/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (fma.f64 2/45 (.f64 (/.f64 (.f64 (.f64 (/.f64 (-.f64 (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) 2)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 32400 (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (fma.f64 1/22674816000000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/1511654400000)))) (.f64 180 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (/.f64 (.f64 180 (-.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale)))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 -32400 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (pow.f64 (PI.f64) 2))))) (PI.f64))))))) (.f64 angle (+.f64 (/.f64 (.f64 180 (-.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))))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2))) (.f64 x-scale x-scale)))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 -32400 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (pow.f64 (PI.f64) 2))))))))))
(fma.f64 90 (/.f64 2 (/.f64 (.f64 (.f64 angle (-.f64 (.f64 b b) (.f64 a a))) (PI.f64)) (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))))) (fma.f64 1/2 (.f64 (pow.f64 angle 5) (-.f64 (/.f64 (.f64 (+.f64 (/.f64 b (/.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) b)) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (+.f64 (/.f64 b (/.f64 (/.f64 x-scale (/.f64 (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000) x-scale)) b)) (+.f64 (/.f64 a (/.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) a)) (.f64 1/2 (/.f64 (+.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a))) (+.f64 (/.f64 b (/.f64 (/.f64 x-scale (/.f64 (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000) x-scale)) b)) (-.f64 (-.f64 (/.f64 a (/.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) a)) (/.f64 b (/.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) b))) (/.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 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b))))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)))) (fma.f64 -1/3149280000 (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 4)) (.f64 y-scale y-scale)) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)))))) (fma.f64 4 (pow.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 3) x-scale))) -1/8748000) 2) (.f64 2/45 (.f64 (/.f64 (fma.f64 1/22674816000000 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 5) x-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 5) x-scale))) 1/1511654400000)) y-scale) (/.f64 (PI.f64) (/.f64 x-scale (-.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 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b))))) (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (.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 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a))) 2) (-.f64 (fma.f64 (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)))) (fma.f64 -1/3149280000 (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 4)) (.f64 y-scale y-scale)) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))))) (+.f64 (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)))) (fma.f64 -1/3149280000 (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 4)) (.f64 y-scale y-scale)) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))))) (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b))))) 2)) (.f64 2/45 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) (/.f64 (PI.f64) (/.f64 y-scale (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 3) x-scale))) -1/8748000))))))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b))))) (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (.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 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a))))) 2)))))) (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a))))))))) 180) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 180 (/.f64 (+.f64 (.f64 180 (/.f64 (-.f64 (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b)))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b))))) (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (.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 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -32400 (.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) -1/8748000)) (/.f64 (.f64 2 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 b (/.f64 (.f64 x-scale x-scale) b)))) (pow.f64 (PI.f64) 2))))) (/.f64 (PI.f64) (/.f64 (fma.f64 1/22674816000000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/1511654400000)) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 32400 (.f64 (/.f64 (fma.f64 -1/1469328076800000000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 7)) (fma.f64 -1/30855889612800000000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 7)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 7)) -1/734664038400000000))) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 2 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 b (/.f64 (.f64 x-scale x-scale) b)))) (pow.f64 (PI.f64) 2))) (.f64 180 (.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000)) (/.f64 (-.f64 (.f64 180 (/.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 4)) (.f64 y-scale y-scale)) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)))) (fma.f64 -1/3149280000 (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 4)) (.f64 y-scale y-scale)) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))))) (+.f64 (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)))) (fma.f64 -1/3149280000 (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 4)) (.f64 y-scale y-scale)) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))))) (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b))))) 2)) (.f64 2/45 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) (/.f64 (PI.f64) (/.f64 y-scale (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 3) x-scale))) -1/8748000))))))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b))))) (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (.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 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a))))) 2)) (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 32400 (.f64 (/.f64 2 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))))) (/.f64 (fma.f64 1/22674816000000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/1511654400000)) (pow.f64 (PI.f64) 2))) (.f64 180 (.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000)) (/.f64 (+.f64 (.f64 180 (/.f64 (-.f64 (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b)))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b))))) (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (.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 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -32400 (.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) -1/8748000)) (/.f64 (.f64 2 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 b (/.f64 (.f64 x-scale x-scale) b)))) (pow.f64 (PI.f64) 2))))) (PI.f64)))))) (PI.f64)))))))) (.f64 1/2 (+.f64 (.f64 angle (+.f64 (.f64 180 (/.f64 (-.f64 (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b)))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b))))) (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (.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 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -32400 (.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) -1/8748000)) (/.f64 (.f64 2 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 b (/.f64 (.f64 x-scale x-scale) b)))) (pow.f64 (PI.f64) 2)))))) (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 4)) (.f64 y-scale y-scale)) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)))) (fma.f64 1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)))) (fma.f64 -1/3149280000 (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 4)) (.f64 y-scale y-scale)) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))))) (fma.f64 2/45 (.f64 (/.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 3) x-scale))) (/.f64 y-scale -1/8748000)) (/.f64 (PI.f64) (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)))) (fma.f64 -1/3149280000 (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 4)) (.f64 y-scale y-scale)) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))))) (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b))))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b))))) (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (.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 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a))))) 2)) (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 32400 (.f64 (/.f64 2 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))))) (/.f64 (fma.f64 1/22674816000000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/1511654400000)) (pow.f64 (PI.f64) 2))) (.f64 180 (.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000)) (/.f64 (+.f64 (.f64 180 (/.f64 (-.f64 (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b)))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (fma.f64 1/2 (/.f64 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (fma.f64 -1/32400 (/.f64 a (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) a)) (.f64 1/32400 (/.f64 b (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (PI.f64) 2) y-scale)) b))))) (-.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (.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 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 a (/.f64 (.f64 y-scale y-scale) a)))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -32400 (.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) -1/8748000)) (/.f64 (.f64 2 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 b (/.f64 (*.f64 x-scale x-scale) b)))) (pow.f64 (PI.f64) 2))))) (PI.f64)))))))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 1/2 (+.f64 (/.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale)) (+.f64 (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 (.f64 (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 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale 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 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 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))))))
(.f64 1/2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 1/2 (+.f64 (/.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale)) (+.f64 (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 (.f64 (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 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale 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 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 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))))))
(.f64 1/2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 1/2 (+.f64 (/.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale)) (+.f64 (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 (.f64 (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 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale 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 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 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))))))
(.f64 1/2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 1/2 (+.f64 (/.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale)) (+.f64 (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 (.f64 (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 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale 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 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 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))))))
(.f64 1/2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 1/2 (+.f64 (/.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale)) (+.f64 (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 (.f64 (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 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale 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 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 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))))))
(.f64 1/2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 1/2 (+.f64 (/.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale)) (+.f64 (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 (.f64 (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 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale 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 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 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))))))
(.f64 1/2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 1/2 (+.f64 (/.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale)) (+.f64 (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 (.f64 (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 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale 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 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 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))))))
(.f64 1/2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))
(.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 1/2 (+.f64 (/.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale)) (+.f64 (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 (.f64 (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 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale 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 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 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))))))
(.f64 1/2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2))))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))
(.f64 -1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 -1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64)))))))
(.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))))))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (.f64 (-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 1 (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))) (pow.f64 b 2))))
(fma.f64 -1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 1/2 (.f64 (.f64 b b) (-.f64 (fma.f64 -1 (/.f64 (-.f64 (/.f64 (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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)))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (fma.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (/.f64 1 (pow.f64 a 4)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (/.f64 (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 x-scale x-scale)) (.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 a a))))) (/.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 a a)) (sin.f64 (.f64 (*.f64 1/180 angle) (PI.f64)))))))))
(fma.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))))))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (.f64 (.f64 b b) (-.f64 (fma.f64 -1 (/.f64 (-.f64 (/.f64 (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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))))) (/.f64 (/.f64 1 (pow.f64 a 4)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 y-scale y-scale) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 a a))))))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (.f64 (-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 1 (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (.f64 1/2 (.f64 (-.f64 (.f64 1/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 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (.f64 -1 (/.f64 (-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 1 (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))) (pow.f64 a 2)))) (pow.f64 b 4)))))
(fma.f64 -1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 1/2 (+.f64 (.f64 (.f64 b b) (-.f64 (fma.f64 -1 (/.f64 (-.f64 (/.f64 (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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)))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (fma.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (/.f64 1 (pow.f64 a 4)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (/.f64 (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 x-scale x-scale)) (.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 a a))))) (/.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 a a)) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))) (.f64 (pow.f64 b 4) (-.f64 (.f64 (.f64 1/2 (/.f64 (-.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 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) 2)) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (neg.f64 (/.f64 (-.f64 (fma.f64 -1 (/.f64 (-.f64 (/.f64 (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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)))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (fma.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (/.f64 1 (pow.f64 a 4)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (/.f64 (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 x-scale x-scale)) (.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 a a))))) (/.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 a a)) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (*.f64 a a))))))))
(fma.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))))))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (+.f64 (.f64 (.f64 b b) (-.f64 (fma.f64 -1 (/.f64 (-.f64 (/.f64 (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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))))) (/.f64 (/.f64 1 (pow.f64 a 4)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 y-scale y-scale) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)))))) (.f64 (pow.f64 b 4) (-.f64 (.f64 1/2 (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))) 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))))))))) (neg.f64 (/.f64 (-.f64 (fma.f64 -1 (/.f64 (-.f64 (/.f64 (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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))))) (/.f64 (/.f64 1 (pow.f64 a 4)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 y-scale y-scale) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))) (*.f64 a a))))))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (.f64 (-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 1 (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (+.f64 (.f64 1/2 (.f64 (pow.f64 b 6) (-.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 a 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))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (.f64 -1 (/.f64 (-.f64 (.f64 1/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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 1 (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)))) (pow.f64 a 2)))))) (.f64 1/2 (.f64 (-.f64 (.f64 1/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 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (.f64 -1 (/.f64 (-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (/.f64 1 (.f64 (pow.f64 a 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))) (pow.f64 a 2)))) (pow.f64 b 4))))))
(fma.f64 -1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (fma.f64 1/2 (.f64 (.f64 b b) (-.f64 (fma.f64 -1 (/.f64 (-.f64 (/.f64 (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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)))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (fma.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (/.f64 1 (pow.f64 a 4)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (/.f64 (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 x-scale x-scale)) (.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 a a))))) (/.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 a a)) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))) (.f64 1/2 (+.f64 (.f64 (pow.f64 b 6) (-.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (.f64 (/.f64 (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (.f64 a a)) (/.f64 (-.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 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))))) (neg.f64 (/.f64 (-.f64 (.f64 (.f64 1/2 (/.f64 (-.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 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) 2)) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (neg.f64 (/.f64 (-.f64 (fma.f64 -1 (/.f64 (-.f64 (/.f64 (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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)))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (fma.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (/.f64 1 (pow.f64 a 4)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (/.f64 (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 x-scale x-scale)) (.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 a a))))) (/.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 a a)) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 a a)))) (.f64 a a))))) (.f64 (pow.f64 b 4) (-.f64 (.f64 (.f64 1/2 (/.f64 (-.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 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) 2)) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (neg.f64 (/.f64 (-.f64 (fma.f64 -1 (/.f64 (-.f64 (/.f64 (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 -8 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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)))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (fma.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (/.f64 1 (pow.f64 a 4)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (/.f64 (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 x-scale x-scale)) (.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 a a))))) (/.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 a a)) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (*.f64 a a)))))))))
(fma.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))))))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 1/2 (.f64 (.f64 b b) (-.f64 (fma.f64 -1 (/.f64 (-.f64 (/.f64 (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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))))) (/.f64 (/.f64 1 (pow.f64 a 4)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 y-scale y-scale) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)))))) (.f64 1/2 (+.f64 (.f64 (pow.f64 b 4) (-.f64 (.f64 1/2 (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))) 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))))))))) (neg.f64 (/.f64 (-.f64 (fma.f64 -1 (/.f64 (-.f64 (/.f64 (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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))))) (/.f64 (/.f64 1 (pow.f64 a 4)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 y-scale y-scale) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))) (.f64 a a))))) (.f64 (pow.f64 b 6) (-.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))))))) (.f64 (/.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))))) (.f64 a a)) (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))) 2)) (.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (neg.f64 (/.f64 (-.f64 (.f64 1/2 (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))) 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))))))))) (neg.f64 (/.f64 (-.f64 (fma.f64 -1 (/.f64 (-.f64 (/.f64 (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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))))) (/.f64 (/.f64 1 (pow.f64 a 4)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 y-scale y-scale) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))) (.f64 a a)))) (*.f64 a a)))))))))
(.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(/.f64 (.f64 1/2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64)))))
(/.f64 1/2 (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2))))
(.f64 1/2 (+.f64 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (/.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (fma.f64 -1 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-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))))))) (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 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 (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))) (*.f64 b b))))
(.f64 1/2 (+.f64 (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (-.f64 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (/.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 b b))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))) (pow.f64 b 4)))))
(fma.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (.f64 1/2 (+.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (fma.f64 -1 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-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))))))) (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 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 (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))) (.f64 b b)) (/.f64 (-.f64 (.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 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 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (-.f64 (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (pow.f64 (.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 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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2)))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (fma.f64 -1 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-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))))))) (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 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 (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))))))) (pow.f64 b 4)))))
(fma.f64 1/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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (+.f64 (/.f64 (-.f64 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (/.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 b b)) (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))))) 2))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (/.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))) (pow.f64 b 4)))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/4 (.f64 (/.f64 (.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (pow.f64 a 2) (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))))) (pow.f64 b 6))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))) (pow.f64 b 4))))))
(fma.f64 1/2 (/.f64 (-.f64 (.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 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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (-.f64 (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (pow.f64 (.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 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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (/.f64 (.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.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 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 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (-.f64 (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (pow.f64 (.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 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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2)))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (fma.f64 -1 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-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))))))) (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 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 (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))))))))) (pow.f64 b 6)) (fma.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (.f64 1/2 (+.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (fma.f64 -1 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-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))))))) (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 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 (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))) (.f64 b b)) (/.f64 (-.f64 (.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 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 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (-.f64 (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (pow.f64 (.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 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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2)))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (fma.f64 -1 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-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))))))) (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 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 (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))))))) (pow.f64 b 4))))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))))) 2))) (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))))) 2))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (/.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))))) (pow.f64 b 6)) (fma.f64 1/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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (+.f64 (/.f64 (-.f64 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (/.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 b b)) (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))))) 2))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (/.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))) (pow.f64 b 4))))))
(.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(/.f64 (.f64 1/2 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64)))))
(/.f64 1/2 (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2))))
(.f64 1/2 (+.f64 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (/.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (fma.f64 -1 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-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))))))) (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 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 (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))) (*.f64 b b))))
(.f64 1/2 (+.f64 (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (-.f64 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (/.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 b b))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))) (pow.f64 b 4)))))
(fma.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (.f64 1/2 (+.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (fma.f64 -1 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-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))))))) (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 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 (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))) (.f64 b b)) (/.f64 (-.f64 (.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 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 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (-.f64 (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (pow.f64 (.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 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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2)))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (fma.f64 -1 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-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))))))) (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 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 (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))))))) (pow.f64 b 4)))))
(fma.f64 1/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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (+.f64 (/.f64 (-.f64 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (/.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 b b)) (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))))) 2))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (/.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))) (pow.f64 b 4)))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 1/4 (.f64 (/.f64 (.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (pow.f64 a 2) (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))))) (pow.f64 b 6))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))) (pow.f64 b 4))))))
(fma.f64 1/2 (/.f64 (-.f64 (.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 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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (-.f64 (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (pow.f64 (.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 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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (/.f64 (.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.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 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 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (-.f64 (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (pow.f64 (.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 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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2)))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (fma.f64 -1 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-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))))))) (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 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 (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))))))))) (pow.f64 b 6)) (fma.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (.f64 1/2 (+.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (fma.f64 -1 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-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))))))) (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 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 (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))) (.f64 b b)) (/.f64 (-.f64 (.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 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 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (-.f64 (.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (pow.f64 (.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 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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2)))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (fma.f64 -1 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-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))))))) (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 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 (fma.f64 -4 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 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 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))))))) (pow.f64 b 4))))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))))) 2))) (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))))) 2))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (/.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))))) (pow.f64 b 6)) (fma.f64 1/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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (+.f64 (/.f64 (-.f64 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (/.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 b b)) (/.f64 (-.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))))) 2))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (neg.f64 (.f64 (.f64 a a) (-.f64 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (-.f64 (/.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))) (pow.f64 b 4))))))
(.f64 -1/2 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64)))))))
(.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1/4 (/.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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.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 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(fma.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 -1/4 (/.f64 (.f64 y-scale y-scale) (/.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 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -1/4 (.f64 (/.f64 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))) y-scale)) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 4 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (/.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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.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 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 1/8 (/.f64 (.f64 (pow.f64 y-scale 4) (.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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/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))) (.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) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))
(fma.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (fma.f64 -1/4 (/.f64 (.f64 y-scale y-scale) (/.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 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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)))) (.f64 1/8 (/.f64 (.f64 (.f64 (pow.f64 y-scale 4) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 (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 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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))))) 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 (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 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64)))))))))))
(fma.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 -1/4 (.f64 (/.f64 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))) y-scale)) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 4 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 1/8 (.f64 (/.f64 (pow.f64 y-scale 4) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 4 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 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) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 -1/2 (/.f64 (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (/.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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.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 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (+.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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (.f64 (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)))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/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 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.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 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 1/8 (/.f64 (.f64 (pow.f64 y-scale 4) (.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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/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))) (.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) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))))
(fma.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (fma.f64 -1/4 (/.f64 (.f64 y-scale y-scale) (/.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 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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/4 (.f64 (/.f64 (pow.f64 y-scale 6) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.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 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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)) (/.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 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.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 -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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 (.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))))))))) (pow.f64 (.f64 1/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 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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))))) 2)) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))) (.f64 1/8 (/.f64 (.f64 (.f64 (pow.f64 y-scale 4) (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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 (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 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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))))) 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 (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 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))))))))))))
(fma.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 -1/4 (.f64 (/.f64 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))) y-scale)) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 4 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 1/4 (/.f64 (fma.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 4 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.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 (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 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 4 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 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) (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))))))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 y-scale 6))) (.f64 1/8 (.f64 (/.f64 (pow.f64 y-scale 4) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 4 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 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) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 -1/2 (/.f64 (.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 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 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))
(.f64 -1/2 (/.f64 2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (pow.f64 b 2) (pow.f64 a 2))))) (.f64 1/2 (/.f64 (+.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))) (pow.f64 y-scale 2))))
(fma.f64 -1/2 (/.f64 (.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 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 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 1/2 (/.f64 (+.f64 (.f64 (/.f64 (.f64 a a) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (-.f64 (.f64 (/.f64 (.f64 b b) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.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 (.f64 1/180 angle) (PI.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))))) (*.f64 y-scale y-scale))))
(fma.f64 -1/2 (/.f64 2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))) (.f64 1/2 (/.f64 (+.f64 (.f64 (/.f64 a (/.f64 (-.f64 (.f64 b b) (.f64 a a)) a)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (-.f64 (.f64 (/.f64 (.f64 b b) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 4 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) (*.f64 y-scale y-scale))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (pow.f64 b 2) (pow.f64 a 2))))) (.f64 1/2 (/.f64 (+.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 y-scale 2))) (.f64 -1/4 (/.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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 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))))) 2)) (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))
(fma.f64 -1/2 (/.f64 (.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 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 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (fma.f64 1/2 (/.f64 (+.f64 (.f64 (/.f64 (.f64 a a) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (-.f64 (.f64 (/.f64 (.f64 b b) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.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 (.f64 1/180 angle) (PI.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))))) (.f64 y-scale y-scale)) (.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 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 y-scale 4) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))))))
(fma.f64 -1/2 (/.f64 2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))) (fma.f64 1/2 (/.f64 (+.f64 (.f64 (/.f64 a (/.f64 (-.f64 (.f64 b b) (.f64 a a)) a)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (-.f64 (.f64 (/.f64 (.f64 b b) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 4 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) (.f64 y-scale y-scale)) (.f64 -1/4 (/.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 (.f64 (pow.f64 (cos.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))) 2)) (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/8 (/.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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 6) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (pow.f64 b 2) (pow.f64 a 2))))) (.f64 1/2 (/.f64 (+.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 y-scale 2))) (.f64 -1/4 (/.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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 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))))) 2)) (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))))
(fma.f64 -1/2 (/.f64 (.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 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 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (fma.f64 1/8 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))))) (fma.f64 1/2 (/.f64 (+.f64 (.f64 (/.f64 (.f64 a a) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (-.f64 (.f64 (/.f64 (.f64 b b) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.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 (.f64 1/180 angle) (PI.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))))) (.f64 y-scale y-scale)) (.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 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 y-scale 4) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))))))))
(fma.f64 -1/2 (/.f64 2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))) (fma.f64 1/8 (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 4 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))) 2)) (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))) 2) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))))) (fma.f64 1/2 (/.f64 (+.f64 (.f64 (/.f64 a (/.f64 (-.f64 (.f64 b b) (.f64 a a)) a)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (-.f64 (.f64 (/.f64 (.f64 b b) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 4 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) (.f64 y-scale y-scale)) (.f64 -1/4 (/.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 (.f64 (pow.f64 (cos.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))) 2)) (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))))))
(.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 -1/2 (/.f64 (.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 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 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))
(.f64 -1/2 (/.f64 2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (pow.f64 b 2) (pow.f64 a 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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))) (pow.f64 y-scale 2))))
(fma.f64 -1/2 (/.f64 (.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 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 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (.f64 1/2 (/.f64 (+.f64 (+.f64 (.f64 (/.f64 (.f64 a a) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (.f64 (/.f64 (.f64 b b) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.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 (.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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 y-scale y-scale))))
(fma.f64 -1/2 (/.f64 2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))) (.f64 1/2 (/.f64 (+.f64 (+.f64 (.f64 (/.f64 a (/.f64 (-.f64 (.f64 b b) (.f64 a a)) a)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 (/.f64 (.f64 b b) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.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 (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))))))) (*.f64 y-scale y-scale))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (pow.f64 b 2) (pow.f64 a 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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 y-scale 2))) (.f64 -1/4 (/.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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))
(fma.f64 -1/2 (/.f64 (.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 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 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (fma.f64 1/2 (/.f64 (+.f64 (+.f64 (.f64 (/.f64 (.f64 a a) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (.f64 (/.f64 (.f64 b b) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.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 (.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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 y-scale y-scale)) (/.f64 (.f64 -1/4 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 y-scale 4) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))))))
(fma.f64 -1/2 (/.f64 2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))) (fma.f64 1/2 (/.f64 (+.f64 (+.f64 (.f64 (/.f64 a (/.f64 (-.f64 (.f64 b b) (.f64 a a)) a)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 (/.f64 (.f64 b b) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.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 (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))))))) (.f64 y-scale y-scale)) (.f64 -1/4 (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 4 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))) 2)) (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (pow.f64 b 2) (pow.f64 a 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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 y-scale 2))) (+.f64 (.f64 1/8 (/.f64 (.f64 (+.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 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))))) 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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (.f64 -1/4 (/.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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))))
(fma.f64 -1/2 (/.f64 (.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 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 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))) (fma.f64 1/2 (/.f64 (+.f64 (+.f64 (.f64 (/.f64 (.f64 a a) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (.f64 (/.f64 (.f64 b b) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.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 (.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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 y-scale y-scale)) (fma.f64 1/8 (.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 y-scale 6)) (/.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 (.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))))) (/.f64 (.f64 -1/4 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.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 y-scale 4) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))))))
(fma.f64 -1/2 (/.f64 2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))) (fma.f64 1/2 (/.f64 (+.f64 (+.f64 (.f64 (/.f64 a (/.f64 (-.f64 (.f64 b b) (.f64 a a)) a)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 (/.f64 (.f64 b b) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.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 (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))))))) (.f64 y-scale y-scale)) (fma.f64 1/8 (.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 4 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (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 4 (/.f64 (.f64 (pow.f64 (cos.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))) 2)) (.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))) 2) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 -1/4 (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.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 4 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))) 2)) (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))))))
(.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(/.f64 (.f64 -1/2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))
(.f64 -1/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 1/2 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (pow.f64 b 2) (pow.f64 a 2)))))) (.f64 1/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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))
(fma.f64 -1/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))) (.f64 1/2 (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64)))))))))))
(fma.f64 -1/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 1/2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 1/2 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (pow.f64 b 2) (pow.f64 a 2)))))) (.f64 1/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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (.f64 -1/4 (/.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2))) (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.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 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(fma.f64 -1/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))) (fma.f64 1/2 (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))))) (/.f64 (.f64 -1/4 (.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 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (.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 (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 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))))
(fma.f64 -1/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 1/2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.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 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (*.f64 x-scale x-scale))))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 1/2 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (pow.f64 b 2) (pow.f64 a 2)))))) (.f64 1/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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (+.f64 (.f64 -1/4 (/.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2))) (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.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 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 1/8 (/.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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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))))) 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 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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))))))))))
(fma.f64 -1/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))) (fma.f64 1/2 (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))) (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (/.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))))) (fma.f64 -1/4 (.f64 (/.f64 (.f64 x-scale x-scale) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (.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 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))) (/.f64 (.f64 1/8 (.f64 (.f64 (pow.f64 x-scale 4) (-.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.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))))))))
(fma.f64 -1/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 1/2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) (fma.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.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 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale x-scale))) (.f64 1/8 (.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 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) 2)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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)))) (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))))))))
(.f64 -1/2 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(+.f64 (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 4) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.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 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) 2)) (.f64 (pow.f64 x-scale 4) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))) (.f64 -1/2 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64)))))))))
(fma.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 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2)) (.f64 (pow.f64 x-scale 4) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 -1/2 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))
(+.f64 (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 4) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 1/8 (/.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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 6) (.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))) 3) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(fma.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 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) 2)) (.f64 (pow.f64 x-scale 4) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))) (fma.f64 1/8 (.f64 (/.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) 2)) (pow.f64 x-scale 6)) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 3) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))) (.f64 -1/2 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))))))))))
(fma.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 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2)) (.f64 (pow.f64 x-scale 4) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 1/8 (.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 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2)) (pow.f64 x-scale 6)) (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 3) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 -1/2 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))))
(+.f64 (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 4) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 1/8 (/.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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 6) (.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))) 3) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 1/4 (/.f64 (+.f64 (.f64 -1/4 (/.f64 (.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 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 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))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 (pow.f64 x-scale 8) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))))
(fma.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 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) 2)) (.f64 (pow.f64 x-scale 4) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))) (fma.f64 1/8 (.f64 (/.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) 2)) (pow.f64 x-scale 6)) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 3) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))) (fma.f64 1/4 (/.f64 (fma.f64 -1/4 (/.f64 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (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 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) 2))) (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (.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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 4)) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) 2)) (+.f64 (/.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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) 2)) (.f64 (pow.f64 x-scale 8) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))) (.f64 -1/2 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64)))))))))))
(fma.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 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2)) (.f64 (pow.f64 x-scale 4) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 1/8 (.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 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2)) (pow.f64 x-scale 6)) (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 3) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 1/4 (/.f64 (fma.f64 -1/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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 4) (.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2))))) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2)) (.f64 (pow.f64 x-scale 8) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 -1/2 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))))
(.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))))))))
(.f64 -1/2 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(+.f64 (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 4) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.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 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) 2)) (.f64 (pow.f64 x-scale 4) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))) (.f64 -1/2 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64)))))))))
(fma.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 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2)) (.f64 (pow.f64 x-scale 4) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 -1/2 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))
(+.f64 (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 4) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 1/8 (/.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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 6) (.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))) 3) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(fma.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 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) 2)) (.f64 (pow.f64 x-scale 4) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))) (fma.f64 1/8 (.f64 (/.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) 2)) (pow.f64 x-scale 6)) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 3) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))) (.f64 -1/2 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))))))))))
(fma.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 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2)) (.f64 (pow.f64 x-scale 4) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 1/8 (.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 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2)) (pow.f64 x-scale 6)) (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 3) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 -1/2 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))))
(+.f64 (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (.f64 (pow.f64 x-scale 4) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 1/8 (/.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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 6) (.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))) 3) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (.f64 1/4 (/.f64 (+.f64 (.f64 -1/4 (/.f64 (.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 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 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))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 (pow.f64 x-scale 8) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -1/2 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))))
(fma.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 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) 2)) (.f64 (pow.f64 x-scale 4) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))) (fma.f64 1/8 (.f64 (/.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) 2)) (pow.f64 x-scale 6)) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 3) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))) (fma.f64 1/4 (/.f64 (fma.f64 -1/4 (/.f64 (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (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 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) 2))) (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (.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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) 4)) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) 2)) (+.f64 (/.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 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) 2)) (.f64 (pow.f64 x-scale 8) (.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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))))))) (.f64 -1/2 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))) (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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)) (.f64 y-scale y-scale))))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64)))))))))))
(fma.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 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2)) (.f64 (pow.f64 x-scale 4) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 1/8 (.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 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2)) (pow.f64 x-scale 6)) (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 3) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 1/4 (/.f64 (fma.f64 -1/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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 4) (.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (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))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2))))) (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))) 2)) (.f64 (pow.f64 x-scale 8) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 -1/2 (/.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))))
(+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (neg.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))))
(-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale))))
(-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 (/.f64 x-scale 2) (-.f64 (.f64 b b) (*.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale))))
(.f64 1 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) y-scale))))))
(-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale))))
(-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 (/.f64 x-scale 2) (-.f64 (.f64 b b) (*.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale))))
(.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale)))))) (sqrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) y-scale)))))))
(-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale))))
(-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 (/.f64 x-scale 2) (-.f64 (.f64 b b) (*.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale))))
(.f64 (.f64 (cbrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale)))))) (cbrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))))) (cbrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale)))))))
(-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale))))
(-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 (/.f64 x-scale 2) (-.f64 (.f64 b b) (*.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale))))
(/.f64 (-.f64 (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale)))))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))))
(/.f64 (-.f64 (.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 (pow.f64 (.f64 a (cos.f64 (/.f64 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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))))) (+.f64 (+.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))))
(/.f64 (-.f64 (.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 (pow.f64 (.f64 a (cos.f64 (/.f64 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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 (/.f64 x-scale 2) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 (/.f64 x-scale 2) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 (/.f64 x-scale 2) (-.f64 (.f64 b b) (*.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) 3) (pow.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale)))) 3)) (+.f64 (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (+.f64 (.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) 180)) y-scale))))))))
(/.f64 (-.f64 (pow.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)) 3) (pow.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) 3)) (fma.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 (pow.f64 (.f64 a (cos.f64 (/.f64 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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) (+.f64 (+.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))))))
(/.f64 (-.f64 (pow.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)) 3) (pow.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 (/.f64 x-scale 2) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) 3)) (fma.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 (pow.f64 (.f64 a (cos.f64 (/.f64 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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 (/.f64 x-scale 2) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 (/.f64 x-scale 2) (-.f64 (.f64 b b) (*.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale))))))))
(pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) 1)
(-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale))))
(-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 (/.f64 x-scale 2) (-.f64 (.f64 b b) (*.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale))))
(log.f64 (exp.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale)))))))
(-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale))))
(-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 (/.f64 x-scale 2) (-.f64 (.f64 b b) (*.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale))))
(cbrt.f64 (.f64 (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale)))))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale)))))))
(cbrt.f64 (.f64 (-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) (.f64 (-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) (-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))))))
(cbrt.f64 (.f64 (-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 (/.f64 x-scale 2) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) (.f64 (-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 (/.f64 x-scale 2) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) (-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 (/.f64 x-scale 2) (-.f64 (.f64 b b) (*.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))))))
(expm1.f64 (log1p.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale)))))))
(-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale))))
(-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 (/.f64 x-scale 2) (-.f64 (.f64 b b) (*.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale))))
(exp.f64 (log.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale)))))))
(-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale))))
(-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 (/.f64 x-scale 2) (-.f64 (.f64 b b) (*.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale))))
(log1p.f64 (expm1.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale)))))))
(-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale))))
(-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 (/.f64 x-scale 2) (-.f64 (.f64 b b) (*.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale))))
(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))) (/.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale)))) (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))))
(/.f64 (-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))))
(/.f64 (-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 (/.f64 x-scale 2) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))))
(.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (/.f64 1 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))))
(/.f64 (-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))))
(/.f64 (-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 (/.f64 x-scale 2) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))))
(.f64 1 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))))
(/.f64 (-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))))
(/.f64 (-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 (/.f64 x-scale 2) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))))
(.f64 (sqrt.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))))) (sqrt.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a))))))))
(/.f64 (-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))))
(/.f64 (-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 (/.f64 x-scale 2) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))))
(.f64 (.f64 (cbrt.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))))) (cbrt.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))))) (cbrt.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a))))))))
(/.f64 (-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))))
(/.f64 (-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 (/.f64 x-scale 2) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))))
(pow.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))))) 1)
(/.f64 (-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))))
(/.f64 (-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 (/.f64 x-scale 2) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))))
(log.f64 (exp.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a))))))))
(/.f64 (-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))))
(/.f64 (-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 (/.f64 x-scale 2) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))))
(cbrt.f64 (.f64 (.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))) (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))))) (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a))))))))
(cbrt.f64 (.f64 (/.f64 (-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (/.f64 (-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))) (/.f64 (-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))))))
(cbrt.f64 (.f64 (/.f64 (-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 (/.f64 x-scale 2) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (/.f64 (-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 (/.f64 x-scale 2) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))) (/.f64 (-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 (/.f64 x-scale 2) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))))))
(expm1.f64 (log1p.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a))))))))
(/.f64 (-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))))
(/.f64 (-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 (/.f64 x-scale 2) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))))
(exp.f64 (log.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a))))))))
(/.f64 (-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))))
(/.f64 (-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 (/.f64 x-scale 2) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))))
(log1p.f64 (expm1.f64 (/.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (/.f64 x-scale (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) y-scale))))) (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) 180)) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a))))))))
(/.f64 (-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) x-scale) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))))
(/.f64 (-.f64 (-.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 (pow.f64 (.f64 a (sin.f64 (/.f64 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 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (/.f64 (/.f64 x-scale 2) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))) (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))))

eval28.8s (19.2%)

Compiler: Compiled 794753 to 486024 computations (38.8% saved)

prune1.1s (0.7%)

Pruning

29 alts after pruning (29 fresh and 0 done)

	Pruned	Kept	Total
New	1935	29	1964
Fresh	0	0	0
Picked	1	0	1
Done	3	0	3
Total	1939	29	1968

Accurracy

57.9%

Counts

1968 → 29

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	10.7%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))))))))
	14.1%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (/.f64 (.f64 2 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 b (/.f64 (.f64 x-scale x-scale) b)))) (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))))))))
	18.5%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (/.f64 (neg.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))) (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))))))
	11.0%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (.f64 90 (/.f64 2 (/.f64 (.f64 (.f64 angle (-.f64 (.f64 b b) (.f64 a a))) (PI.f64)) (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 b (/.f64 (.f64 x-scale x-scale) b)))))))))
	7.0%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.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 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
	8.7%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))))))
	6.3%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))))))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
	18.5%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (.f64 -1/2 (/.f64 2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 a a))))))))))
	9.2%	(.f64 (atan.f64 (.f64 y-scale (/.f64 (-.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 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 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 (.f64 (/.f64 (-.f64 b a) (/.f64 y-scale (+.f64 a b))) 2) (/.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) x-scale))))) (.f64 1 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))))))) (/.f64 180 (PI.f64)))
	24.6%	(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 1/2 x-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (/.f64 180 (PI.f64)))
▶	18.3%	(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))))) (/.f64 180 (PI.f64)))
	13.9%	(.f64 (atan.f64 (.f64 y-scale (/.f64 (neg.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))))))) (/.f64 180 (PI.f64)))
	7.9%	(.f64 (atan.f64 (.f64 y-scale (.f64 90 (.f64 (/.f64 x-scale angle) (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (/.f64 180 (PI.f64)))
	24.8%	(.f64 (atan.f64 (.f64 y-scale (.f64 -1/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))) (/.f64 180 (PI.f64)))
	14.0%	(.f64 (atan.f64 (.f64 y-scale (.f64 -1/2 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))))) (/.f64 180 (PI.f64)))
	18.5%	(.f64 (atan.f64 (.f64 y-scale (.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))))) (/.f64 180 (PI.f64)))
	11.3%	(.f64 180 (/.f64 (atan.f64 (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 1) x-scale) y-scale))) (PI.f64)))
	22.7%	(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 1/2 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
	17.8%	(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 -1/2 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
	18.3%	(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 -1/2 (.f64 x-scale (.f64 y-scale (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a)))))) (PI.f64)))
	25.2%	(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 -1/2 y-scale) (/.f64 (.f64 x-scale (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (PI.f64)))
	13.8%	(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (/.f64 (/.f64 (.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))) (PI.f64)))
	14.1%	(.f64 180 (/.f64 (atan.f64 (/.f64 (neg.f64 (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (/.f64 (/.f64 (.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))) (PI.f64)))
▶	21.5%	(.f64 180 (/.f64 (atan.f64 (.f64 (.f64 -1/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (*.f64 y-scale x-scale))) (PI.f64)))
	17.3%	(.f64 180 (/.f64 (atan.f64 (.f64 (.f64 -1/2 (/.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (*.f64 y-scale x-scale))) (PI.f64)))
▶	9.0%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))))) (PI.f64)))
	24.2%	(.f64 180 (/.f64 (atan.f64 (.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (PI.f64)))
	23.6%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (PI.f64)))
▶	25.5%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))))) (PI.f64)))

Compiler

Compiled 5428 to 3610 computations (33.5% saved)

localize282.0ms (0.2%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	85.8%	(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))
✓	61.6%	(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
✓	61.4%	(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
✓	45.0%	(/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))

Compiler

Compiled 586 to 335 computations (42.8% saved)

series16.0ms (0%)

Counts

4 → 84

Calls

21 calls:

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

rewrite172.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

592×	`add-sqr-sqrt`
582×	`*-un-lft-identity`
578×	`pow1`
544×	`add-exp-log`
544×	`add-log-exp`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	27	266
1	579	244
2	7814	244

Stop Event

1×	node limit

Counts

4 → 102

Calls

Call 1

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

Outputs
(((-.f64 (exp.f64 (log1p.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 1 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 1 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2))) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (/.f64 1 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 (cbrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2))) (cbrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 (cbrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2)) 2)) (cbrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) 2) (.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (/.f64 1 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))) 1/2)) (/.f64 1 (-.f64 (.f64 b b) (.f64 a a)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 (/.f64 1 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2)) (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 (neg.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (/.f64 1 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))) 1/2) (neg.f64 (-.f64 (.f64 b b) (.f64 a a)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 (/.f64 1 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))) 1/2)) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (-.f64 (.f64 b b) (.f64 a a)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 (/.f64 1 (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.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>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 (/.f64 1 (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2))) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 (/.f64 1 (pow.f64 (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2)) 2)) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))) 1/2)) (-.f64 (pow.f64 b 4) (pow.f64 a 4))) (fma.f64 b b (.f64 a a))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))) 1/2)) (-.f64 (pow.f64 b 6) (pow.f64 a 6))) (+.f64 (pow.f64 b 4) (+.f64 (pow.f64 a 4) (pow.f64 (.f64 b 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))) 1/2)) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (-.f64 (.f64 b b) (.f64 a a)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.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>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) 1) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (pow.f64 (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2)) 2)) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) 2) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) 2) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))) 1/2)) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (-.f64 (.f64 b b) (.f64 a a)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) 2) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.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>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) 2) 1) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) 2) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2))) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) 2) (pow.f64 (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2)) 2)) (cbrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((pow.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((pow.f64 (cbrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2))) 3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2)) 3) 1/3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((pow.f64 (/.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))) 1/2) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (-.f64 (.f64 b b) (.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>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((neg.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))) 1/2) (neg.f64 (-.f64 (.f64 b b) (.f64 a a)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((log.f64 (exp.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((cbrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2)) 3)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((cbrt.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) 3) (pow.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2) 3))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((expm1.f64 (log1p.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((exp.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((exp.f64 (.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((log1p.f64 (expm1.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((pow.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1/2) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((pow.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((pow.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3) 1/3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((sqrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((fabs.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((log.f64 (exp.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((cbrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((expm1.f64 (log1p.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((exp.f64 (log.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((exp.f64 (.f64 (log.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 1)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((log1p.f64 (expm1.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)))
(((-.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>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a 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>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a 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>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a 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>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a 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>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a 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>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a 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>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a 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>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a 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>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a 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>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a 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>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a 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>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a 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>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a 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>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a 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>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a 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>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a 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>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a 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>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a 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>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a 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>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a 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>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((pow.f64 (cbrt.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((pow.f64 (pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) 3) 1/3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((sqrt.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 a 4))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((log.f64 (exp.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((cbrt.f64 (pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((cbrt.f64 (.f64 (pow.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 3) (pow.f64 a 6))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((cbrt.f64 (.f64 (pow.f64 a 6) (pow.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 3))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((expm1.f64 (log1p.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((exp.f64 (log.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((exp.f64 (.f64 (log.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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>) ((/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) #f)) ((log1p.f64 (expm1.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a))) #f)))

simplify228.0ms (0.2%)

Algorithm

1×	egg-herbie

Rules

1450×	`times-frac`
1266×	`associate-r`
1042×	`associate-/r*`
926×	`associate-l`
686×	`*-commutative`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	550	24532
1	1690	23094

Stop Event

1×	node limit

Counts

186 → 245

Calls

Call 1

Inputs
(.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(+.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2)) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(+.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2)) (+.f64 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 4)) (pow.f64 a 2)) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 6)) (pow.f64 a 4)) (+.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2)) (+.f64 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 4)) (pow.f64 a 2)) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(-.f64 (+.f64 (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(-.f64 (+.f64 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2)) (pow.f64 b 4)) (+.f64 (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(-.f64 (+.f64 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2)) (pow.f64 b 4)) (+.f64 (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 4)) (pow.f64 b 6))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(-.f64 (+.f64 (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(-.f64 (+.f64 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2)) (pow.f64 b 4)) (+.f64 (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(-.f64 (+.f64 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2)) (pow.f64 b 4)) (+.f64 (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 4)) (pow.f64 b 6))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 360 (/.f64 (pow.f64 b 2) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))
(+.f64 (.f64 angle (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (.f64 360 (/.f64 (pow.f64 b 2) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))
(+.f64 (.f64 angle (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 2 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (.f64 -1/1574640000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2))))))) (.f64 360 (/.f64 (pow.f64 b 2) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))
(+.f64 (.f64 angle (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 2 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (.f64 -1/1574640000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2))))))) (+.f64 (.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6))))) (.f64 2 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 180 (/.f64 (.f64 (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))))) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 2 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (.f64 -1/1574640000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/1469328076800000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7))) (+.f64 (.f64 -1/30855889612800000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7))) (+.f64 (.f64 -1/881596846080000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7))) (.f64 -1/4407984230400000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7)))))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))))) (.f64 360 (/.f64 (pow.f64 b 2) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(+.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)))) (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)) (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(+.f64 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 4)) (pow.f64 b 2)) (+.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)))) (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)) (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)))) (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)) (+.f64 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)))) (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 6)) (pow.f64 b 4)) (+.f64 (/.f64 (.f64 (pow.f64 a 4) (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2)) (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(-.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(-.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2)) (pow.f64 a 4)) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(-.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2)) (pow.f64 a 4)) (+.f64 (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 b 4) (-.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 6))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(-.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(-.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2)) (pow.f64 a 4)) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(-.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2)) (pow.f64 a 4)) (+.f64 (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 b 4) (-.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 6))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (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))))
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/32400 (.f64 (pow.f64 angle 2) (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))))
(+.f64 (.f64 -1/3149280000 (.f64 (pow.f64 angle 4) (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)))) (.f64 1/32400 (.f64 (pow.f64 angle 2) (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)))))
(+.f64 (.f64 -1/3149280000 (.f64 (pow.f64 angle 4) (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)))) (+.f64 (.f64 (pow.f64 angle 6) (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6))))) (.f64 1/32400 (.f64 (pow.f64 angle 2) (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))))))
(+.f64 (.f64 -1/3149280000 (.f64 (pow.f64 angle 4) (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)))) (+.f64 (.f64 (pow.f64 angle 6) (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6))))) (+.f64 (.f64 1/32400 (.f64 (pow.f64 angle 2) (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)))) (.f64 (pow.f64 angle 8) (.f64 (pow.f64 a 2) (+.f64 (.f64 -1/2777030065152000000000 (pow.f64 (PI.f64) 8)) (.f64 -1/396718580736000000000 (pow.f64 (PI.f64) 8))))))))
(.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(-.f64 (exp.f64 (log1p.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2)))) 1)
(.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 1 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2)))
(.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2)) 1)
(.f64 1 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2)))
(.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2))) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2))))
(.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (/.f64 1 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2))))
(.f64 (cbrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2))) (cbrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2)) 2)))
(.f64 (cbrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2)) 2)) (cbrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2))))
(.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) 2) (.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (/.f64 1 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2))))
(.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))) 1/2)) (/.f64 1 (-.f64 (.f64 b b) (.f64 a a))))
(.f64 (/.f64 1 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2)) (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))))
(.f64 (neg.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (/.f64 1 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))) 1/2) (neg.f64 (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a)))))
(.f64 (/.f64 1 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))) 1/2)) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (-.f64 (.f64 b b) (.f64 a a))))
(.f64 (/.f64 1 (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))) 1/2)))
(.f64 (/.f64 1 (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2))) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2)) 2)) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2))))
(.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))) 1/2)) (-.f64 (pow.f64 b 4) (pow.f64 a 4))) (fma.f64 b b (*.f64 a a)))
(.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))) 1/2)) (-.f64 (pow.f64 b 6) (pow.f64 a 6))) (+.f64 (pow.f64 b 4) (+.f64 (pow.f64 a 4) (pow.f64 (*.f64 b a) 2))))
(.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))) 1/2)) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (-.f64 (.f64 b b) (*.f64 a a))))
(.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2))) 1/2)))
(.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) 1) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2)))
(.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (pow.f64 (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2)) 2)) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) 2) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) 2) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))) 1/2)) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (-.f64 (.f64 b b) (*.f64 a a))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) 2) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2))) 1/2)))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) 2) 1) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2)))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) 2) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2))) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) 2) (pow.f64 (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2)) 2)) (cbrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2))))
(pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2)) 1)
(pow.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2))) 2)
(pow.f64 (cbrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2))) 3)
(pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2)) 3) 1/3)
(pow.f64 (/.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))) 1/2) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (-.f64 (.f64 b b) (*.f64 a a)))) -1)
(neg.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))) 1/2) (neg.f64 (-.f64 (.f64 b b) (.f64 a a))))))
(sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2)) 2))
(log.f64 (exp.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2))))
(log.f64 (+.f64 1 (expm1.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2)))))
(cbrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2)) 3))
(cbrt.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) 3) (pow.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2) 3)))
(expm1.f64 (log1p.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2))))
(exp.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2))))
(exp.f64 (.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2))) 1))
(log1p.f64 (expm1.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2))))
(-.f64 (exp.f64 (log1p.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 1)
(.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 1)
(.f64 1 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2)))
(pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1)
(pow.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1/2)
(pow.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)
(pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3)
(pow.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3) 1/3)
(sqrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(fabs.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(log.f64 (exp.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(log.f64 (+.f64 1 (expm1.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(cbrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3))
(expm1.f64 (log1p.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(exp.f64 (log.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(exp.f64 (.f64 (log.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 1))
(log1p.f64 (expm1.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(-.f64 (exp.f64 (log1p.f64 (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 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) a) 2))) 1)
(pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) a) 2) 1)
(pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) a) 2)
(pow.f64 (cbrt.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) a) 2)) 3)
(pow.f64 (pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) a) 2) 3) 1/3)
(sqrt.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 4) (pow.f64 a 4)))
(log.f64 (exp.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) a) 2)))
(log.f64 (+.f64 1 (expm1.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) a) 2))))
(cbrt.f64 (pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) a) 2) 3))
(cbrt.f64 (.f64 (pow.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2) 3) (pow.f64 a 6)))
(cbrt.f64 (.f64 (pow.f64 a 6) (pow.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2) 3)))
(expm1.f64 (log1p.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) a) 2)))
(exp.f64 (log.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) a) 2)))
(exp.f64 (.f64 (log.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2)) 1))
(log1p.f64 (expm1.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) a) 2)))

Outputs
(.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(+.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2)) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(fma.f64 (+.f64 (.f64 -2 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a))))) (.f64 b b) (.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(fma.f64 (.f64 -2 (+.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))) (/.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 b b) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(+.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2)) (+.f64 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 4)) (pow.f64 a 2)) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(fma.f64 (+.f64 (.f64 -2 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a))))) (.f64 b b) (+.f64 (.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (+.f64 (.f64 -2 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a))))) (/.f64 (*.f64 a a) (pow.f64 b 4)))))
(+.f64 (fma.f64 (.f64 -2 (+.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))) (/.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 b b) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (pow.f64 b 4) a) (/.f64 (.f64 -2 (+.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))) (/.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))) a)))
(+.f64 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 6)) (pow.f64 a 4)) (+.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2)) (+.f64 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 4)) (pow.f64 a 2)) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (fma.f64 (+.f64 (.f64 -2 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a))))) (.f64 b b) (+.f64 (.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (+.f64 (.f64 -2 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a))))) (/.f64 (.f64 a a) (pow.f64 b 4))))) (/.f64 (+.f64 (.f64 -2 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a))))) (/.f64 (pow.f64 a 4) (pow.f64 b 6))))
(+.f64 (+.f64 (fma.f64 (.f64 -2 (+.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))) (/.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 b b) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (pow.f64 b 4) a) (/.f64 (.f64 -2 (+.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))) (/.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) a))) (.f64 (/.f64 (.f64 -2 (+.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))) (/.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 4)) (pow.f64 b 6)))
(.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (.f64 2 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(-.f64 (+.f64 (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 2 (+.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 2 (.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(.f64 2 (+.f64 (+.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 a a) (.f64 b b)))) (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 a a) (*.f64 b b)))))
(-.f64 (+.f64 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2)) (pow.f64 b 4)) (+.f64 (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (/.f64 (fma.f64 2 (/.f64 (.f64 a a) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (/.f64 (.f64 -2 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (pow.f64 b 4) (.f64 a a))) (+.f64 (.f64 2 (+.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 2 (.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))))
(+.f64 (.f64 2 (+.f64 (+.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 a a) (.f64 b b)))) (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 a a) (.f64 b b))))) (.f64 (/.f64 (.f64 2 (+.f64 (.f64 (/.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 (.f64 a a) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 4)) (.f64 a a)))
(-.f64 (+.f64 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2)) (pow.f64 b 4)) (+.f64 (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 4)) (pow.f64 b 6))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (/.f64 (fma.f64 2 (/.f64 (.f64 a a) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (/.f64 (.f64 -2 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (pow.f64 b 4) (.f64 a a))) (-.f64 (fma.f64 2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (fma.f64 2 (.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (fma.f64 2 (/.f64 (.f64 a a) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (/.f64 (.f64 -2 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (pow.f64 b 6) (pow.f64 a 4))))) (.f64 -2 (.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))
(+.f64 (fma.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (fma.f64 2 (.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 a a) (.f64 b b))) (.f64 (/.f64 (.f64 2 (+.f64 (.f64 (/.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 (.f64 a a) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 6)) (pow.f64 a 4)))) (+.f64 (.f64 (/.f64 (.f64 2 (+.f64 (.f64 (/.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 (.f64 a a) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 4)) (.f64 a a)) (.f64 2 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 a a) (.f64 b b))))))
(.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (.f64 2 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(-.f64 (+.f64 (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 2 (+.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 2 (.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(.f64 2 (+.f64 (+.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 a a) (.f64 b b)))) (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 a a) (*.f64 b b)))))
(-.f64 (+.f64 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2)) (pow.f64 b 4)) (+.f64 (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (/.f64 (fma.f64 2 (/.f64 (.f64 a a) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (/.f64 (.f64 -2 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (pow.f64 b 4) (.f64 a a))) (+.f64 (.f64 2 (+.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 2 (.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))))
(+.f64 (.f64 2 (+.f64 (+.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 a a) (.f64 b b)))) (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 a a) (.f64 b b))))) (.f64 (/.f64 (.f64 2 (+.f64 (.f64 (/.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 (.f64 a a) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 4)) (.f64 a a)))
(-.f64 (+.f64 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2)) (pow.f64 b 4)) (+.f64 (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 4)) (pow.f64 b 6))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (/.f64 (fma.f64 2 (/.f64 (.f64 a a) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (/.f64 (.f64 -2 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (pow.f64 b 4) (.f64 a a))) (-.f64 (fma.f64 2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (fma.f64 2 (.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (fma.f64 2 (/.f64 (.f64 a a) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (/.f64 (.f64 -2 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (pow.f64 b 6) (pow.f64 a 4))))) (.f64 -2 (.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))
(+.f64 (fma.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (fma.f64 2 (.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 a a) (.f64 b b))) (.f64 (/.f64 (.f64 2 (+.f64 (.f64 (/.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 (.f64 a a) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 6)) (pow.f64 a 4)))) (+.f64 (.f64 (/.f64 (.f64 2 (+.f64 (.f64 (/.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 (.f64 a a) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 4)) (.f64 a a)) (.f64 2 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 a a) (.f64 b b))))))
(.f64 360 (/.f64 (pow.f64 b 2) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))
(.f64 360 (/.f64 (/.f64 (.f64 b b) angle) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))
(.f64 360 (.f64 (/.f64 b angle) (/.f64 b (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))
(+.f64 (.f64 angle (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (.f64 360 (/.f64 (pow.f64 b 2) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))
(fma.f64 angle (+.f64 (/.f64 (.f64 180 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 -1/16200 (.f64 b b)) (pow.f64 (PI.f64) 2)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 -64800 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 b b) (pow.f64 (PI.f64) 2))))) (.f64 360 (/.f64 (/.f64 (.f64 b b) angle) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))
(fma.f64 angle (fma.f64 180 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 a a) 1/16200) (.f64 (.f64 b b) -1/16200))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (/.f64 (.f64 b b) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)))) -64800)) (.f64 360 (.f64 (/.f64 b angle) (/.f64 b (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))
(+.f64 (.f64 angle (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 2 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (.f64 -1/1574640000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2))))))) (.f64 360 (/.f64 (pow.f64 b 2) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))
(fma.f64 angle (+.f64 (/.f64 (.f64 180 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 -1/16200 (.f64 b b)) (pow.f64 (PI.f64) 2)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 -64800 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 b b) (pow.f64 (PI.f64) 2))))) (fma.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (fma.f64 2 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (.f64 -1/1574640000 (.f64 (.f64 a a) (pow.f64 (PI.f64) 4)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 180 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (/.f64 (.f64 180 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 -1/16200 (.f64 b b)) (pow.f64 (PI.f64) 2)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 -64800 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 b b) (pow.f64 (PI.f64) 2))))) (PI.f64))) (.f64 64800 (.f64 (/.f64 (fma.f64 1/2267481600000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/3779136000000)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))))) (.f64 360 (/.f64 (/.f64 (.f64 b b) angle) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))
(fma.f64 angle (fma.f64 180 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 a a) 1/16200) (.f64 (.f64 b b) -1/16200))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (/.f64 (.f64 b b) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)))) -64800)) (fma.f64 (pow.f64 angle 3) (+.f64 (.f64 180 (-.f64 (/.f64 (fma.f64 2 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 4) -1/1574640000))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (/.f64 (fma.f64 180 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 a a) 1/16200) (.f64 (.f64 b b) -1/16200))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (/.f64 (.f64 b b) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)))) -64800)) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (PI.f64))))) (.f64 -64800 (.f64 (/.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/1417176000000) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (.f64 360 (.f64 (/.f64 b angle) (/.f64 b (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))
(+.f64 (.f64 angle (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 2 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (.f64 -1/1574640000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2))))))) (+.f64 (.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6))))) (.f64 2 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 180 (/.f64 (.f64 (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))))) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 2 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (.f64 -1/1574640000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/1469328076800000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7))) (+.f64 (.f64 -1/30855889612800000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7))) (+.f64 (.f64 -1/881596846080000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7))) (.f64 -1/4407984230400000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7)))))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))))) (.f64 360 (/.f64 (pow.f64 b 2) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))))
(fma.f64 angle (+.f64 (/.f64 (.f64 180 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 -1/16200 (.f64 b b)) (pow.f64 (PI.f64) 2)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 -64800 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 b b) (pow.f64 (PI.f64) 2))))) (fma.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (fma.f64 2 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (.f64 -1/1574640000 (.f64 (.f64 a a) (pow.f64 (PI.f64) 4)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 180 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (/.f64 (.f64 180 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 -1/16200 (.f64 b b)) (pow.f64 (PI.f64) 2)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 -64800 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 b b) (pow.f64 (PI.f64) 2))))) (PI.f64))) (.f64 64800 (.f64 (/.f64 (fma.f64 1/2267481600000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/3779136000000)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))))) (fma.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 180 (.f64 (/.f64 (fma.f64 1/2267481600000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/3779136000000)) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (/.f64 (.f64 180 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 -1/16200 (.f64 b b)) (pow.f64 (PI.f64) 2)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 -64800 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 b b) (pow.f64 (PI.f64) 2))))) (PI.f64))) (fma.f64 180 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 180 (/.f64 (fma.f64 2 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (.f64 -1/1574640000 (.f64 (.f64 a a) (pow.f64 (PI.f64) 4)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 180 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (/.f64 (.f64 180 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 -1/16200 (.f64 b b)) (pow.f64 (PI.f64) 2)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 -64800 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 b b) (pow.f64 (PI.f64) 2))))) (PI.f64))) (.f64 64800 (.f64 (/.f64 (.f64 b b) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (fma.f64 1/22674816000000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/1511654400000)) (pow.f64 (PI.f64) 2)))))))) (.f64 64800 (.f64 (/.f64 (fma.f64 -1/1469328076800000000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 7)) (fma.f64 -1/30855889612800000000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 7)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 7)) -1/734664038400000000))) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 b b) (pow.f64 (PI.f64) 2))))))) (.f64 360 (/.f64 (/.f64 (.f64 b b) angle) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
(fma.f64 angle (fma.f64 180 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 a a) 1/16200) (.f64 (.f64 b b) -1/16200))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (/.f64 (.f64 b b) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)))) -64800)) (fma.f64 (pow.f64 angle 3) (+.f64 (.f64 180 (-.f64 (/.f64 (fma.f64 2 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 4) -1/1574640000))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (/.f64 (fma.f64 180 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 a a) 1/16200) (.f64 (.f64 b b) -1/16200))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (/.f64 (.f64 b b) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)))) -64800)) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (PI.f64))))) (.f64 -64800 (.f64 (/.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/1417176000000) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (fma.f64 (pow.f64 angle 5) (-.f64 (/.f64 (.f64 360 (+.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 180 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/1417176000000) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (fma.f64 180 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 a a) 1/16200) (.f64 (.f64 b b) -1/16200))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (/.f64 (.f64 b b) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)))) -64800)) (PI.f64))) (fma.f64 180 (.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000)) (/.f64 (+.f64 (.f64 180 (-.f64 (/.f64 (fma.f64 2 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 4) -1/1574640000))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (/.f64 (fma.f64 180 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 a a) 1/16200) (.f64 (.f64 b b) -1/16200))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (/.f64 (.f64 b b) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)))) -64800)) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (PI.f64))))) (.f64 -64800 (.f64 (/.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/1417176000000) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (PI.f64))) (.f64 64800 (.f64 (/.f64 (fma.f64 -1/1469328076800000000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 7)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 7)) -43/30855889612800000000)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 b b) (pow.f64 (PI.f64) 2))))))) (.f64 360 (.f64 (/.f64 b angle) (/.f64 b (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 2 (+.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a)))))
(.f64 (/.f64 2 (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 2 (+.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a)))))
(.f64 (/.f64 2 (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 2 (+.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a)))))
(.f64 (/.f64 2 (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 2 (+.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a)))))
(.f64 (/.f64 2 (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 2 (+.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a)))))
(.f64 (/.f64 2 (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 2 (+.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a)))))
(.f64 (/.f64 2 (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 2 (+.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a)))))
(.f64 (/.f64 2 (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 2 (+.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a)))))
(.f64 (/.f64 2 (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (.f64 2 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(+.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)))) (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)) (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(fma.f64 (fma.f64 2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))) (neg.f64 (/.f64 (.f64 -2 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))))) (.f64 a a) (/.f64 (.f64 2 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(fma.f64 (.f64 2 (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b))))) (.f64 a a) (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 4)) (pow.f64 b 2)) (+.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)))) (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)) (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (fma.f64 (fma.f64 2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))) (neg.f64 (/.f64 (.f64 -2 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))))) (.f64 a a) (/.f64 (.f64 2 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (pow.f64 a 4) (/.f64 (.f64 b b) (fma.f64 2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))) (neg.f64 (/.f64 (.f64 -2 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (*.f64 b b))))))))
(+.f64 (fma.f64 (.f64 2 (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b))))) (.f64 a a) (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (pow.f64 a 4) (.f64 b b)) (.f64 2 (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)))))))
(+.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)))) (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)) (+.f64 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)))) (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 6)) (pow.f64 b 4)) (+.f64 (/.f64 (.f64 (pow.f64 a 4) (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2)) (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(fma.f64 (fma.f64 2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))) (neg.f64 (/.f64 (.f64 -2 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))))) (.f64 a a) (+.f64 (/.f64 (fma.f64 2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))) (neg.f64 (/.f64 (.f64 -2 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))))) (/.f64 (pow.f64 b 4) (pow.f64 a 6))) (+.f64 (/.f64 (.f64 2 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (pow.f64 a 4) (/.f64 (.f64 b b) (fma.f64 2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))) (neg.f64 (/.f64 (.f64 -2 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))))))))))
(fma.f64 (.f64 2 (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b))))) (.f64 a a) (+.f64 (/.f64 (.f64 2 (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b))))) (/.f64 (pow.f64 b 4) (pow.f64 a 6))) (+.f64 (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 (/.f64 (pow.f64 a 4) (.f64 b b)) (.f64 2 (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b b)))))))))
(.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(-.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 -2 (+.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (/.f64 (.f64 b b) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 -2 (.f64 (/.f64 (.f64 b b) (.f64 a a)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(.f64 -2 (+.f64 (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))) (.f64 b b))) (.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (*.f64 (/.f64 b a) (/.f64 b a)))))
(-.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2)) (pow.f64 a 4)) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (fma.f64 -2 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (/.f64 (.f64 b b) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (+.f64 (.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (+.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (/.f64 (pow.f64 a 4) (.f64 b b))))) (.f64 -2 (.f64 (/.f64 (.f64 b b) (.f64 a a)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(+.f64 (+.f64 (.f64 -2 (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))) (.f64 b b)))) (/.f64 (.f64 b b) (/.f64 (pow.f64 a 4) (.f64 -2 (+.f64 (.f64 (/.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 (.f64 b b) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -2 (.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 b a) (/.f64 b a)))))
(-.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2)) (pow.f64 a 4)) (+.f64 (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 b 4) (-.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 6))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (fma.f64 -2 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (/.f64 (.f64 b b) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (+.f64 (/.f64 (+.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (/.f64 (pow.f64 a 4) (.f64 b b))) (fma.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (pow.f64 b 4) (/.f64 (pow.f64 a 6) (+.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))))))) (.f64 -2 (.f64 (/.f64 (.f64 b b) (.f64 a a)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(+.f64 (fma.f64 -2 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))) (.f64 b b)) (+.f64 (/.f64 (.f64 b b) (/.f64 (pow.f64 a 4) (.f64 -2 (+.f64 (.f64 (/.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 (.f64 b b) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (fma.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 (pow.f64 b 4) (pow.f64 a 6)) (.f64 -2 (+.f64 (.f64 (/.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 (.f64 b b) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (.f64 -2 (.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (*.f64 (/.f64 b a) (/.f64 b a)))))
(.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(-.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 -2 (+.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (/.f64 (.f64 b b) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 -2 (.f64 (/.f64 (.f64 b b) (.f64 a a)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(.f64 -2 (+.f64 (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))) (.f64 b b))) (.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (*.f64 (/.f64 b a) (/.f64 b a)))))
(-.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2)) (pow.f64 a 4)) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (fma.f64 -2 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (/.f64 (.f64 b b) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (+.f64 (.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (+.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (/.f64 (pow.f64 a 4) (.f64 b b))))) (.f64 -2 (.f64 (/.f64 (.f64 b b) (.f64 a a)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(+.f64 (+.f64 (.f64 -2 (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))) (.f64 b b)))) (/.f64 (.f64 b b) (/.f64 (pow.f64 a 4) (.f64 -2 (+.f64 (.f64 (/.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 (.f64 b b) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -2 (.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 b a) (/.f64 b a)))))
(-.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2)) (pow.f64 a 4)) (+.f64 (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 b 4) (-.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 6))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (fma.f64 -2 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (/.f64 (.f64 b b) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (+.f64 (/.f64 (+.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (/.f64 (pow.f64 a 4) (.f64 b b))) (fma.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (pow.f64 b 4) (/.f64 (pow.f64 a 6) (+.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))))))) (.f64 -2 (.f64 (/.f64 (.f64 b b) (.f64 a a)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(+.f64 (fma.f64 -2 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))) (.f64 b b)) (+.f64 (/.f64 (.f64 b b) (/.f64 (pow.f64 a 4) (.f64 -2 (+.f64 (.f64 (/.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 (.f64 b b) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (fma.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 (pow.f64 b 4) (pow.f64 a 6)) (.f64 -2 (+.f64 (.f64 (/.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 (.f64 b b) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (.f64 -2 (.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (*.f64 (/.f64 b a) (/.f64 b a)))))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 1/180 angle))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (.f64 1/180 (.f64 angle (PI.f64))))
(fma.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)) (.f64 (PI.f64) (*.f64 1/180 angle)))
(fma.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)) (.f64 1/180 (*.f64 angle (PI.f64))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)))))
(fma.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)) (fma.f64 1/180 (.f64 angle (PI.f64)) (.f64 (.f64 1/22674816000000 (pow.f64 angle 5)) (pow.f64 (PI.f64) 5))))
(fma.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)) (fma.f64 1/180 (.f64 angle (PI.f64)) (.f64 (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 (PI.f64) 3) (pow.f64 angle 3)) (fma.f64 1/180 (.f64 angle (PI.f64)) (fma.f64 1/22674816000000 (.f64 (pow.f64 (PI.f64) 5) (pow.f64 angle 5)) (.f64 -1/30855889612800000000 (*.f64 (pow.f64 (PI.f64) 7) (pow.f64 angle 7))))))
(fma.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)) (fma.f64 1/180 (.f64 angle (PI.f64)) (fma.f64 1/22674816000000 (.f64 (pow.f64 (PI.f64) 5) (pow.f64 angle 5)) (.f64 (pow.f64 (PI.f64) 7) (*.f64 -1/30855889612800000000 (pow.f64 angle 7))))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
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 (pow.f64 (PI.f64) 2) (.f64 (*.f64 -1/64800 angle) angle)))
(+.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 (PI.f64) 4) (pow.f64 angle 4)) (.f64 (.f64 -1/64800 (.f64 angle angle)) (pow.f64 (PI.f64) 2))))
(+.f64 1 (fma.f64 1/25194240000 (.f64 (pow.f64 (PI.f64) 4) (pow.f64 angle 4)) (.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 -1/64800 angle) angle))))
(+.f64 (.f64 -1/24488801280000000 (.f64 (pow.f64 angle 6) (pow.f64 (PI.f64) 6))) (+.f64 1 (+.f64 (.f64 1/25194240000 (.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (.f64 -1/64800 (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))))
(fma.f64 -1/24488801280000000 (.f64 (pow.f64 (PI.f64) 6) (pow.f64 angle 6)) (+.f64 1 (fma.f64 1/25194240000 (.f64 (pow.f64 (PI.f64) 4) (pow.f64 angle 4)) (.f64 (.f64 -1/64800 (*.f64 angle angle)) (pow.f64 (PI.f64) 2)))))
(fma.f64 -1/24488801280000000 (.f64 (pow.f64 (PI.f64) 6) (pow.f64 angle 6)) (+.f64 1 (fma.f64 1/25194240000 (.f64 (pow.f64 (PI.f64) 4) (pow.f64 angle 4)) (.f64 (pow.f64 (PI.f64) 2) (.f64 (*.f64 -1/64800 angle) angle)))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(.f64 1/32400 (.f64 (pow.f64 angle 2) (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))))
(.f64 1/32400 (.f64 (.f64 (.f64 angle angle) (*.f64 a a)) (pow.f64 (PI.f64) 2)))
(.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (*.f64 angle angle) 1/32400))
(+.f64 (.f64 -1/3149280000 (.f64 (pow.f64 angle 4) (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)))) (.f64 1/32400 (.f64 (pow.f64 angle 2) (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)))))
(fma.f64 -1/3149280000 (.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 4)) (pow.f64 angle 4)) (.f64 1/32400 (.f64 (.f64 (.f64 angle angle) (.f64 a a)) (pow.f64 (PI.f64) 2))))
(fma.f64 -1/3149280000 (.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 a a) (pow.f64 angle 4))) (.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 angle angle) 1/32400)))
(+.f64 (.f64 -1/3149280000 (.f64 (pow.f64 angle 4) (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)))) (+.f64 (.f64 (pow.f64 angle 6) (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6))))) (.f64 1/32400 (.f64 (pow.f64 angle 2) (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))))))
(fma.f64 -1/3149280000 (.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 4)) (pow.f64 angle 4)) (fma.f64 (pow.f64 angle 6) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (.f64 1/32400 (.f64 (.f64 (.f64 angle angle) (*.f64 a a)) (pow.f64 (PI.f64) 2)))))
(fma.f64 -1/3149280000 (.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 a a) (pow.f64 angle 4))) (fma.f64 (pow.f64 angle 6) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (*.f64 angle angle) 1/32400))))
(+.f64 (.f64 -1/3149280000 (.f64 (pow.f64 angle 4) (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)))) (+.f64 (.f64 (pow.f64 angle 6) (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6))))) (+.f64 (.f64 1/32400 (.f64 (pow.f64 angle 2) (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)))) (.f64 (pow.f64 angle 8) (.f64 (pow.f64 a 2) (+.f64 (.f64 -1/2777030065152000000000 (pow.f64 (PI.f64) 8)) (.f64 -1/396718580736000000000 (pow.f64 (PI.f64) 8))))))))
(fma.f64 -1/3149280000 (.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 4)) (pow.f64 angle 4)) (fma.f64 (pow.f64 angle 6) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (fma.f64 1/32400 (.f64 (.f64 (.f64 angle angle) (.f64 a a)) (pow.f64 (PI.f64) 2)) (.f64 (.f64 (pow.f64 angle 8) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 8) -1/347128758144000000000)))))
(fma.f64 -1/3149280000 (.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 a a) (pow.f64 angle 4))) (fma.f64 (pow.f64 angle 6) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (fma.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 a a) (.f64 angle angle))) (.f64 (pow.f64 angle 8) (.f64 a (.f64 a (.f64 (pow.f64 (PI.f64) 8) -1/347128758144000000000)))))))
(.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)
(.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)
(.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)
(.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)
(.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)
(.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)
(.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)
(.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)
(.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)
(.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)
(.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)
(.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)
(.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)
(.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)
(.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)
(.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)
(.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)
(.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)
(.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)
(.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)
(-.f64 (exp.f64 (log1p.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2)))) 1)
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))))))
(.f64 2 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/90))))))
(.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 1 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))))))
(.f64 2 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/90))))))
(.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2)) 1)
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))))))
(.f64 2 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/90))))))
(.f64 1 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))))))
(.f64 2 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/90))))))
(.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2))) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2))))
(pow.f64 (/.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)))) (sqrt.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))))))) 2)
(pow.f64 (/.f64 (hypot.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2)))) (sqrt.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/90)))))) 2)
(.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (/.f64 1 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2))))
(.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)))) (.f64 (/.f64 1 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2))))))) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b) 2))))))
(.f64 (hypot.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2)))) (.f64 (/.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/90))))) (hypot.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b) 2))))))
(.f64 (cbrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2))) (cbrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2)) 2)))
(.f64 (cbrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))))))) (cbrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (*.f64 1/180 angle) 2))))))) 2)))
(.f64 (cbrt.f64 (.f64 2 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/90))))))) (cbrt.f64 (pow.f64 (.f64 2 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/90)))))) 2)))
(.f64 (cbrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2)) 2)) (cbrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2))))
(.f64 (cbrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))))))) (cbrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (*.f64 1/180 angle) 2))))))) 2)))
(.f64 (cbrt.f64 (.f64 2 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/90))))))) (cbrt.f64 (pow.f64 (.f64 2 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/90)))))) 2)))
(.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) 2) (.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (/.f64 1 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2))))
(.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)))) 2) (.f64 (/.f64 1 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2))))))) (cbrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b) 2))))))
(.f64 (/.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/90))))) (.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2)))) (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)))) 2)))
(.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))) 1/2)) (/.f64 1 (-.f64 (.f64 b b) (.f64 a a))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))))))
(.f64 2 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/90))))))
(.f64 (/.f64 1 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2)) (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))))))
(.f64 2 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/90))))))
(.f64 (neg.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (/.f64 1 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))) 1/2) (neg.f64 (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)))) (/.f64 (/.f64 1 (.f64 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))) 1/2)) (neg.f64 (-.f64 (.f64 b b) (.f64 a a)))))
(neg.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/90))) (.f64 -1/2 (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a)))))
(/.f64 (.f64 (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a))))
(/.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))
(.f64 (/.f64 1 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))) 1/2)) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (-.f64 (.f64 b b) (.f64 a a))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))))))
(.f64 2 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/90))))))
(.f64 (/.f64 1 (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))) 1/2)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))))))
(.f64 2 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/90))))))
(.f64 (/.f64 1 (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2))) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2))))
(.f64 (/.f64 1 (sqrt.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))))))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (sqrt.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))))))))
(/.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (sqrt.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/90)))))) (sqrt.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/90))))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2)) 2)) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2))))))) 2)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (cbrt.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))))))))
(/.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (cbrt.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/90)))))) (pow.f64 (cbrt.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/90))))) 2))
(.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))) 1/2)) (-.f64 (pow.f64 b 4) (pow.f64 a 4))) (fma.f64 b b (*.f64 a a)))
(.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (.f64 (-.f64 (pow.f64 b 4) (pow.f64 a 4)) (.f64 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))) 1/2))) (fma.f64 b b (.f64 a a)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/90))))) (/.f64 (-.f64 (pow.f64 b 4) (pow.f64 a 4)) (fma.f64 b b (*.f64 a a))))
(.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))) 1/2)) (-.f64 (pow.f64 b 6) (pow.f64 a 6))) (+.f64 (pow.f64 b 4) (+.f64 (pow.f64 a 4) (pow.f64 (*.f64 b a) 2))))
(.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (.f64 (-.f64 (pow.f64 b 6) (pow.f64 a 6)) (.f64 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))) 1/2))) (+.f64 (+.f64 (pow.f64 b 4) (pow.f64 a 4)) (pow.f64 (.f64 a b) 2)))
(.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/90))) 1/2) (-.f64 (pow.f64 b 6) (pow.f64 a 6)))) (+.f64 (pow.f64 b 4) (+.f64 (pow.f64 a 4) (pow.f64 (*.f64 a b) 2))))
(.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 (/.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 (/.f64 (hypot.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (hypot.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))) 1/2)) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (-.f64 (.f64 b b) (*.f64 a a))))
(.f64 (/.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)))) (.f64 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))) 1/2)) (/.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)))) (-.f64 (.f64 b b) (*.f64 a a))))
(.f64 (/.f64 (hypot.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/90))) 1/2)) (/.f64 (hypot.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2)))) (-.f64 (.f64 b b) (.f64 a a))))
(.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2))) 1/2)))
(.f64 (/.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)))) (.f64 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))) 1/2)) (/.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)))) (-.f64 (.f64 b b) (*.f64 a a))))
(.f64 (/.f64 (hypot.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/90))) 1/2)) (/.f64 (hypot.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2)))) (-.f64 (.f64 b b) (.f64 a a))))
(.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) 1) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2)))
(.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)))) (.f64 (/.f64 1 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2))))))) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b) 2))))))
(.f64 (hypot.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2)))) (.f64 (/.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/90))))) (hypot.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b) 2))))))
(.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (pow.f64 (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2)) 2)) (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2))))
(.f64 (/.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)))) (pow.f64 (cbrt.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2))))))) 2)) (/.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)))) (cbrt.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (*.f64 1/180 angle) 2)))))))))
(/.f64 (hypot.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2)))) (/.f64 (pow.f64 (cbrt.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/90))))) 2) (/.f64 (hypot.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2)))) (cbrt.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/90))))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) 2) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)))) 2) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a)))))
(/.f64 (.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2)))) 2) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) 2) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))) 1/2)) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (-.f64 (.f64 b b) (*.f64 a a))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)))) 2) (.f64 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))) 1/2)) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)))) (-.f64 (.f64 b b) (*.f64 a a))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2)))) 2) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/90)))) (/.f64 (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2)))) (-.f64 (.f64 b b) (*.f64 a a))) 1/2))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) 2) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2))) 1/2)))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)))) 2) (.f64 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))) 1/2)) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)))) (-.f64 (.f64 b b) (*.f64 a a))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2)))) 2) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/90)))) (/.f64 (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2)))) (-.f64 (.f64 b b) (*.f64 a a))) 1/2))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) 2) 1) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2)))
(.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)))) 2) (.f64 (/.f64 1 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2))))))) (cbrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b) 2))))))
(.f64 (/.f64 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/90))))) (.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2)))) (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b) 2)))) 2)))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) 2) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2))) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)))) 2) (sqrt.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))))))) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)))) (sqrt.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (*.f64 1/180 angle) 2)))))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2)))) 2) (sqrt.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/90)))))) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2)))) (sqrt.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/90)))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) 2) (pow.f64 (cbrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2)) 2)) (cbrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2))))
(.f64 (cbrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))))))) (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)))) 2) (pow.f64 (cbrt.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (*.f64 1/180 angle) 2))))))) 2)))
(.f64 (cbrt.f64 (.f64 2 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/90))))))) (/.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2)))) 2) (pow.f64 (cbrt.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/90))))) 2)))
(pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2)) 1)
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))))))
(.f64 2 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/90))))))
(pow.f64 (/.f64 (hypot.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (sqrt.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2))) 2)
(pow.f64 (/.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)))) (sqrt.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))))))) 2)
(pow.f64 (/.f64 (hypot.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2)))) (sqrt.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/90)))))) 2)
(pow.f64 (cbrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2))) 3)
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))))))
(.f64 2 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/90))))))
(pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2)) 3) 1/3)
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))))))
(.f64 2 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/90))))))
(pow.f64 (/.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))) 1/2) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (-.f64 (.f64 b b) (*.f64 a a)))) -1)
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))))))
(.f64 2 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/90))))))
(neg.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))) 1/2) (neg.f64 (-.f64 (.f64 b b) (.f64 a a))))))
(.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)))) (/.f64 (/.f64 1 (.f64 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))) 1/2)) (neg.f64 (-.f64 (.f64 b b) (.f64 a a)))))
(neg.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/90))) (.f64 -1/2 (-.f64 (.f64 b b) (*.f64 a a))))))
(sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2)) 2))
(sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2))))))) 2))
(sqrt.f64 (pow.f64 (.f64 2 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/90)))))) 2))
(log.f64 (exp.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))))))
(.f64 2 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/90))))))
(log.f64 (+.f64 1 (expm1.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2)))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))))))
(.f64 2 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/90))))))
(cbrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2)) 3))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))))))
(.f64 2 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/90))))))
(cbrt.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) 3) (pow.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2) 3)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))))))
(.f64 2 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/90))))))
(expm1.f64 (log1p.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))))))
(.f64 2 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/90))))))
(exp.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))))))
(.f64 2 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/90))))))
(exp.f64 (.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2))) 1))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))))))
(.f64 2 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/90))))))
(log1p.f64 (expm1.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 2)))) 2))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 2 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))))))
(.f64 2 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/90))))))
(-.f64 (exp.f64 (log1p.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 1)
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 1)
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 1 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2)))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) 2)))
(pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1)
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(pow.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1/2)
(sqrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(sqrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))
(pow.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3)
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(pow.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3) 1/3)
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sqrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(sqrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))
(fabs.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(fabs.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(log.f64 (exp.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(log.f64 (+.f64 1 (expm1.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cbrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(expm1.f64 (log1p.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(exp.f64 (log.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(exp.f64 (.f64 (log.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 1))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(log1p.f64 (expm1.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(-.f64 (exp.f64 (log1p.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 1)
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 1)
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 1 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.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 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.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 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.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 1/180 (.f64 angle (PI.f64)))) 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) 2)))
(pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1)
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(pow.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1/2)
(sqrt.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(sqrt.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))
(pow.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3)
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(pow.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3) 1/3)
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sqrt.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(sqrt.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))
(fabs.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(fabs.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(log.f64 (exp.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(log.f64 (+.f64 1 (expm1.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cbrt.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(expm1.f64 (log1p.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(exp.f64 (log.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(exp.f64 (.f64 (log.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 1))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(log1p.f64 (expm1.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(-.f64 (exp.f64 (log1p.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) a) 2))) 1)
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)
(pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) a) 2) 1)
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)
(pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) a) 2)
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)
(pow.f64 (cbrt.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) a) 2)) 3)
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)
(pow.f64 (pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) a) 2) 3) 1/3)
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)
(sqrt.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 4) (pow.f64 a 4)))
(sqrt.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 4)))
(sqrt.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a) 4))
(log.f64 (exp.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) a) 2)))
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)
(log.f64 (+.f64 1 (expm1.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) a) 2))))
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)
(cbrt.f64 (pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) a) 2) 3))
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)
(cbrt.f64 (.f64 (pow.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2) 3) (pow.f64 a 6)))
(cbrt.f64 (.f64 (pow.f64 a 6) (pow.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2) 3)))
(cbrt.f64 (.f64 (pow.f64 a 6) (pow.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) 3)))
(cbrt.f64 (.f64 (pow.f64 a 6) (pow.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2) 3)))
(cbrt.f64 (.f64 (pow.f64 a 6) (pow.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) 3)))
(expm1.f64 (log1p.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) a) 2)))
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)
(exp.f64 (log.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) a) 2)))
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)
(exp.f64 (.f64 (log.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2)) 1))
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)
(log1p.f64 (expm1.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) a) 2)))
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a) 2)

localize117.0ms (0.1%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	82.1%	(/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))
✓	80.0%	(/.f64 (.f64 a a) (.f64 y-scale y-scale))
✓	74.2%	(/.f64 (.f64 b b) (.f64 x-scale x-scale))
✓	47.2%	(/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))

Compiler

Compiled 331 to 68 computations (79.5% saved)

series100.0ms (0.1%)

Counts

4 → 168

Calls

42 calls:

Time	Variable		Point	Expression
63.0ms	angle	@	inf	(/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
4.0ms	angle	@	0	(/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
2.0ms	b	@	-inf	(/.f64 (.f64 b b) (.f64 x-scale x-scale))
2.0ms	b	@	0	(/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
1.0ms	y-scale	@	0	(/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))

rewrite130.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

622×	`times-frac`
586×	`add-sqr-sqrt`
580×	`pow1`
580×	`*-un-lft-identity`
542×	`add-exp-log`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	24	230
1	556	230

Stop Event

1×	node limit

Counts

4 → 177

Calls

Call 1

Inputs
(/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))

Outputs
(((.f64 angle (.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (/.f64 1 x-scale) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 angle (/.f64 1 (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 x-scale (PI.f64))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 angle (/.f64 (/.f64 1 x-scale) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (/.f64 1 x-scale) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 1 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (/.f64 1 x-scale) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (sqrt.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (sqrt.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) 2)) (.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (/.f64 1 x-scale) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (cbrt.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (cbrt.f64 (pow.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (cbrt.f64 (pow.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 2)) (cbrt.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (.f64 angle (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (/.f64 1 x-scale) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 angle (/.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 1 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (/.f64 1 x-scale) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 angle x-scale) (.f64 1/2 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (.f64 1/2 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (/.f64 angle 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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (.f64 angle (neg.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 1 (.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (neg.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>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 1 x-scale) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) 1) (/.f64 angle (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 angle 1) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 1 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (/.f64 angle (/.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 1 (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 1 (cbrt.f64 (pow.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 2))) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (cbrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 1 (.f64 x-scale 2)) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) x-scale) (/.f64 angle (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (/.f64 angle (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 angle (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (pow.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 1/2) (pow.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 1/2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 angle (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) 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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 angle (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 angle (cbrt.f64 (pow.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 2))) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (cbrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (cbrt.f64 (pow.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 2))) (/.f64 angle (cbrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-scale 2)) (/.f64 angle (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) x-scale) (/.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (/.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) 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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) 1) (/.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (/.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (cbrt.f64 (pow.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 2))) (/.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (cbrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale 2)) (/.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) 2)) x-scale) (/.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) 2)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (/.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) 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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) 2)) 1) (/.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) 2)) (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (/.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) 2)) (cbrt.f64 (pow.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 2))) (/.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (cbrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) 2)) (.f64 x-scale 2)) (/.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (.f64 angle (PI.f64)) x-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (.f64 angle (PI.f64)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (.f64 angle (PI.f64)) 1) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (.f64 angle (PI.f64)) (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (.f64 angle (PI.f64)) (cbrt.f64 (pow.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 2))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (cbrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (.f64 angle (PI.f64)) (.f64 x-scale 2)) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((pow.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((neg.f64 (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (neg.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>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((log.f64 (exp.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((cbrt.f64 (.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (pow.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((expm1.f64 (log1p.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((exp.f64 (log.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((log1p.f64 (expm1.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))))) #f)))
(((.f64 b (.f64 b (/.f64 1 (.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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 b (/.f64 1 (/.f64 x-scale (/.f64 b x-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (.f64 b b) (/.f64 1 (.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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 1 (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (sqrt.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (sqrt.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (sqrt.f64 (.f64 b b)) (.f64 (sqrt.f64 (.f64 b b)) (/.f64 1 (.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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (cbrt.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (cbrt.f64 (/.f64 (pow.f64 b 4) (pow.f64 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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (cbrt.f64 (/.f64 (pow.f64 b 4) (pow.f64 x-scale 4))) (cbrt.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (cbrt.f64 (pow.f64 b 4)) (.f64 (cbrt.f64 (.f64 b b)) (/.f64 1 (.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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (.f64 b b) x-scale) (/.f64 1 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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 1 (.f64 x-scale x-scale)) (.f64 b b)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 b x-scale) (/.f64 b x-scale)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (.f64 b (neg.f64 b)) (/.f64 1 (.f64 x-scale (neg.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>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 1 x-scale) (/.f64 (.f64 b b) x-scale)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 1 (sqrt.f64 (.f64 x-scale x-scale))) (/.f64 (.f64 b b) (sqrt.f64 (.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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 1 (cbrt.f64 (pow.f64 x-scale 4))) (/.f64 (.f64 b b) (cbrt.f64 (.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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 b 1) (/.f64 b (.f64 x-scale x-scale))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 b (.f64 x-scale x-scale)) b) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 b (sqrt.f64 (.f64 x-scale x-scale))) (/.f64 b (sqrt.f64 (.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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (pow.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) 1/2) (pow.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) 1/2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (sqrt.f64 (.f64 b b)) 1) (/.f64 (sqrt.f64 (.f64 b b)) (.f64 x-scale x-scale))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (sqrt.f64 (.f64 b b)) x-scale) (/.f64 (sqrt.f64 (.f64 b b)) x-scale)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 b 4)) 1) (/.f64 (cbrt.f64 (.f64 b b)) (.f64 x-scale x-scale))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 b (cbrt.f64 (pow.f64 x-scale 4))) (/.f64 b (cbrt.f64 (.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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (sqrt.f64 (.f64 b b)) (sqrt.f64 (.f64 x-scale x-scale))) (/.f64 (sqrt.f64 (.f64 b b)) (sqrt.f64 (.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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (sqrt.f64 (.f64 b b)) (cbrt.f64 (pow.f64 x-scale 4))) (/.f64 (sqrt.f64 (.f64 b b)) (cbrt.f64 (.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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 b 4)) x-scale) (/.f64 (cbrt.f64 (.f64 b b)) x-scale)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 b 4)) (sqrt.f64 (.f64 x-scale x-scale))) (/.f64 (cbrt.f64 (.f64 b b)) (sqrt.f64 (.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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 b 4)) (cbrt.f64 (pow.f64 x-scale 4))) (/.f64 (cbrt.f64 (.f64 b b)) (cbrt.f64 (.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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((pow.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((neg.f64 (/.f64 (.f64 b b) (.f64 x-scale (neg.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>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((log.f64 (exp.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((cbrt.f64 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (/.f64 (pow.f64 b 4) (pow.f64 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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((expm1.f64 (log1p.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((exp.f64 (log.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((log1p.f64 (expm1.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)))
(((.f64 a (.f64 a (/.f64 1 (.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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 a (/.f64 1 (/.f64 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>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (.f64 a a) (/.f64 1 (.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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (.f64 (/.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>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 1 (.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>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (sqrt.f64 (.f64 a a)) (.f64 (sqrt.f64 (.f64 a a)) (/.f64 1 (.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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (sqrt.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale))) (sqrt.f64 (.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>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (cbrt.f64 (pow.f64 a 4)) (.f64 (cbrt.f64 (.f64 a a)) (/.f64 1 (.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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (cbrt.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale))) (cbrt.f64 (/.f64 (pow.f64 a 4) (pow.f64 y-scale 4)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (cbrt.f64 (/.f64 (pow.f64 a 4) (pow.f64 y-scale 4))) (cbrt.f64 (.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>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (.f64 a a) y-scale) (/.f64 1 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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (.f64 a (neg.f64 a)) (/.f64 1 (.f64 y-scale (neg.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>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 1 (.f64 y-scale y-scale)) (.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 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #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>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 a 1) (/.f64 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>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 1 y-scale) (/.f64 (.f64 a 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>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 1 (sqrt.f64 (.f64 y-scale y-scale))) (/.f64 (.f64 a a) (sqrt.f64 (.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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 1 (cbrt.f64 (pow.f64 y-scale 4))) (/.f64 (.f64 a a) (cbrt.f64 (.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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #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>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 a (sqrt.f64 (.f64 y-scale y-scale))) (/.f64 a (sqrt.f64 (.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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (pow.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) 1/2) (pow.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) 1/2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (sqrt.f64 (.f64 a a)) 1) (/.f64 (sqrt.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>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (sqrt.f64 (.f64 a a)) y-scale) (/.f64 (sqrt.f64 (.f64 a 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>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 a 4)) 1) (/.f64 (cbrt.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>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 a (cbrt.f64 (pow.f64 y-scale 4))) (/.f64 a (cbrt.f64 (.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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (sqrt.f64 (.f64 a a)) (sqrt.f64 (.f64 y-scale y-scale))) (/.f64 (sqrt.f64 (.f64 a a)) (sqrt.f64 (.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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (sqrt.f64 (.f64 a a)) (cbrt.f64 (pow.f64 y-scale 4))) (/.f64 (sqrt.f64 (.f64 a a)) (cbrt.f64 (.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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 a 4)) y-scale) (/.f64 (cbrt.f64 (.f64 a 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>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 a 4)) (sqrt.f64 (.f64 y-scale y-scale))) (/.f64 (cbrt.f64 (.f64 a a)) (sqrt.f64 (.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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 a 4)) (cbrt.f64 (pow.f64 y-scale 4))) (/.f64 (cbrt.f64 (.f64 a a)) (cbrt.f64 (.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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((pow.f64 (.f64 (/.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>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((neg.f64 (/.f64 (.f64 a a) (.f64 y-scale (neg.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>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((log.f64 (exp.f64 (.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>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((cbrt.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (/.f64 (pow.f64 a 4) (pow.f64 y-scale 4)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((expm1.f64 (log1p.f64 (.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>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((exp.f64 (log.f64 (.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>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((log1p.f64 (expm1.f64 (.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>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)))
(((.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 1 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (sqrt.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle)))) (sqrt.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (sqrt.f64 y-scale) (.f64 (sqrt.f64 y-scale) (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle)))) (cbrt.f64 (pow.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle))) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (cbrt.f64 (pow.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle))) 2)) (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (cbrt.f64 (.f64 y-scale y-scale)) (.f64 (cbrt.f64 y-scale) (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle)) 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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (neg.f64 y-scale) (/.f64 1 (.f64 (neg.f64 (/.f64 angle x-scale)) (.f64 1/2 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) x-scale) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b 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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) 1) (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (cbrt.f64 (pow.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 2))) (cbrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale 2)) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 y-scale angle) (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 x-scale (PI.f64)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 y-scale 1) (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 1 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 y-scale (/.f64 (/.f64 1 x-scale) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 1 (sqrt.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (/.f64 y-scale (sqrt.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 1 (cbrt.f64 (pow.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 2))) (/.f64 y-scale (cbrt.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 1 (/.f64 angle x-scale)) (/.f64 y-scale (.f64 1/2 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 y-scale (/.f64 angle (/.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 y-scale (.f64 angle (neg.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (neg.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>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (pow.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle))) 1/2) (pow.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle))) 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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (sqrt.f64 y-scale) 1) (/.f64 (sqrt.f64 y-scale) (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (sqrt.f64 y-scale) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (sqrt.f64 y-scale) (/.f64 (/.f64 1 x-scale) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) 1) (/.f64 (cbrt.f64 y-scale) (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (sqrt.f64 y-scale) (sqrt.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (/.f64 (sqrt.f64 y-scale) (sqrt.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (sqrt.f64 y-scale) (cbrt.f64 (pow.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 2))) (/.f64 (sqrt.f64 y-scale) (cbrt.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (sqrt.f64 y-scale) (/.f64 angle x-scale)) (/.f64 (sqrt.f64 y-scale) (.f64 1/2 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cbrt.f64 y-scale) (/.f64 (/.f64 1 x-scale) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (sqrt.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (/.f64 (cbrt.f64 y-scale) (sqrt.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (cbrt.f64 (pow.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 2))) (/.f64 (cbrt.f64 y-scale) (cbrt.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (/.f64 angle x-scale)) (/.f64 (cbrt.f64 y-scale) (.f64 1/2 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((pow.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((neg.f64 (/.f64 y-scale (.f64 (neg.f64 (/.f64 angle x-scale)) (.f64 1/2 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((log.f64 (exp.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((cbrt.f64 (.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle))) (pow.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle))) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((expm1.f64 (log1p.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((exp.f64 (log.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))) #f)) ((log1p.f64 (expm1.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))))) #f)))

simplify222.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

1574×	`associate-/r*`
1534×	`associate-r`
1506×	`associate-*r/`
1478×	`associate-/l*`
1358×	`associate-*l/`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	744	34941
1	2549	34691

Stop Event

1×	node limit

Counts

345 → 424

Calls

Call 1

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

Outputs
(.f64 1/2 (/.f64 (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 x-scale (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))))
(.f64 1/2 (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
(.f64 1/2 (/.f64 (.f64 angle (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 1/2 (/.f64 (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 x-scale (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))))
(.f64 1/2 (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
(.f64 1/2 (/.f64 (.f64 angle (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 1/2 (/.f64 (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 x-scale (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))))
(.f64 1/2 (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
(.f64 1/2 (/.f64 (.f64 angle (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 1/2 (/.f64 (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 x-scale (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))))
(.f64 1/2 (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
(.f64 1/2 (/.f64 (.f64 angle (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 1/2 (/.f64 (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 x-scale (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))))
(.f64 1/2 (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
(.f64 1/2 (/.f64 (.f64 angle (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 1/2 (/.f64 (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 x-scale (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))))
(.f64 1/2 (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
(.f64 1/2 (/.f64 (.f64 angle (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 1/2 (/.f64 (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 x-scale (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))))
(.f64 1/2 (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
(.f64 1/2 (/.f64 (.f64 angle (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 1/2 (/.f64 (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 x-scale (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))))
(.f64 1/2 (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
(.f64 1/2 (/.f64 (.f64 angle (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 1/2 (/.f64 (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 x-scale (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))))
(.f64 1/2 (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
(.f64 1/2 (/.f64 (.f64 angle (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 1/2 (/.f64 (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 x-scale (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))))
(.f64 1/2 (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
(.f64 1/2 (/.f64 (.f64 angle (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 1/2 (/.f64 (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 x-scale (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))))
(.f64 1/2 (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
(.f64 1/2 (/.f64 (.f64 angle (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 1/2 (/.f64 (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))) (.f64 x-scale (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))))
(.f64 1/2 (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
(.f64 1/2 (/.f64 (.f64 angle (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (*.f64 angle (PI.f64))) x-scale))
(.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 x-scale (*.f64 angle (PI.f64)))))
(.f64 -1/2 (/.f64 y-scale (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64)))))
(+.f64 (.f64 1/2 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (PI.f64))) (.f64 x-scale (pow.f64 a 2))) (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 angle (PI.f64))) (.f64 (pow.f64 x-scale 3) (pow.f64 a 2)))) (pow.f64 b 2))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (*.f64 angle (PI.f64))) x-scale)))
(fma.f64 1/2 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 angle (PI.f64))) (.f64 (.f64 a a) x-scale)) (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 x-scale 3)) (/.f64 (.f64 angle (PI.f64)) (.f64 a a))))) (.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 x-scale (*.f64 angle (PI.f64))))))
(fma.f64 1/2 (.f64 (.f64 b b) (-.f64 (/.f64 y-scale (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64))))) (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 x-scale 3)) (/.f64 angle (/.f64 (.f64 a a) (PI.f64)))))) (.f64 -1/2 (/.f64 y-scale (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))))))
(+.f64 (.f64 1/2 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (PI.f64))) (.f64 x-scale (pow.f64 a 2))) (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 angle (PI.f64))) (.f64 (pow.f64 x-scale 3) (pow.f64 a 2)))) (pow.f64 b 2))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (PI.f64))) (.f64 x-scale (pow.f64 a 2))) (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 angle (PI.f64))) (.f64 (pow.f64 x-scale 3) (pow.f64 a 2)))) (pow.f64 b 4))) (.f64 (pow.f64 x-scale 2) (pow.f64 a 2)))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (*.f64 angle (PI.f64))) x-scale))))
(fma.f64 1/2 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 angle (PI.f64))) (.f64 (.f64 a a) x-scale)) (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 x-scale 3)) (/.f64 (.f64 angle (PI.f64)) (.f64 a a))))) (fma.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (.f64 (-.f64 (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 angle (PI.f64))) (.f64 (.f64 a a) x-scale)) (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 x-scale 3)) (/.f64 (.f64 angle (PI.f64)) (.f64 a a)))) (pow.f64 b 4)) (.f64 a a))) (.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 x-scale (.f64 angle (PI.f64)))))))
(fma.f64 1/2 (.f64 (.f64 b b) (-.f64 (/.f64 y-scale (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64))))) (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 x-scale 3)) (/.f64 angle (/.f64 (.f64 a a) (PI.f64)))))) (fma.f64 1/2 (/.f64 y-scale (/.f64 (/.f64 (/.f64 (.f64 a (.f64 a (.f64 x-scale x-scale))) (pow.f64 b 4)) (-.f64 (/.f64 y-scale (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64))))) (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 x-scale 3)) (/.f64 angle (/.f64 (.f64 a a) (PI.f64)))))) y-scale)) (.f64 -1/2 (/.f64 y-scale (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 1/2 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (PI.f64))) (.f64 x-scale (pow.f64 a 2))) (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 angle (PI.f64))) (.f64 (pow.f64 x-scale 3) (pow.f64 a 2)))) (pow.f64 b 2))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (PI.f64))) (.f64 x-scale (pow.f64 a 2))) (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 angle (PI.f64))) (.f64 (pow.f64 x-scale 3) (pow.f64 a 2)))) (pow.f64 b 6))) (.f64 (pow.f64 x-scale 4) (pow.f64 a 4)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (PI.f64))) (.f64 x-scale (pow.f64 a 2))) (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 angle (PI.f64))) (.f64 (pow.f64 x-scale 3) (pow.f64 a 2)))) (pow.f64 b 4))) (.f64 (pow.f64 x-scale 2) (pow.f64 a 2)))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (*.f64 angle (PI.f64))) x-scale)))))
(fma.f64 1/2 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 angle (PI.f64))) (.f64 (.f64 a a) x-scale)) (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 x-scale 3)) (/.f64 (.f64 angle (PI.f64)) (.f64 a a))))) (fma.f64 1/2 (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 x-scale 4)) (/.f64 (.f64 (-.f64 (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 angle (PI.f64))) (.f64 (.f64 a a) x-scale)) (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 x-scale 3)) (/.f64 (.f64 angle (PI.f64)) (.f64 a a)))) (pow.f64 b 6)) (pow.f64 a 4))) (fma.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (.f64 (-.f64 (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 angle (PI.f64))) (.f64 (.f64 a a) x-scale)) (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 x-scale 3)) (/.f64 (.f64 angle (PI.f64)) (.f64 a a)))) (pow.f64 b 4)) (.f64 a a))) (.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 x-scale (.f64 angle (PI.f64))))))))
(fma.f64 1/2 (.f64 (.f64 b b) (-.f64 (/.f64 y-scale (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64))))) (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 x-scale 3)) (/.f64 angle (/.f64 (.f64 a a) (PI.f64)))))) (fma.f64 1/2 (/.f64 (pow.f64 y-scale 4) (/.f64 (/.f64 (.f64 (pow.f64 x-scale 4) (pow.f64 a 4)) (pow.f64 b 6)) (-.f64 (/.f64 y-scale (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64))))) (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 x-scale 3)) (/.f64 angle (/.f64 (.f64 a a) (PI.f64))))))) (fma.f64 1/2 (/.f64 y-scale (/.f64 (/.f64 (/.f64 (.f64 a (.f64 a (.f64 x-scale x-scale))) (pow.f64 b 4)) (-.f64 (/.f64 y-scale (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64))))) (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 x-scale 3)) (/.f64 angle (/.f64 (.f64 a a) (PI.f64)))))) y-scale)) (.f64 -1/2 (/.f64 y-scale (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))))))))
(.f64 -1/2 (.f64 x-scale (*.f64 angle (PI.f64))))
(.f64 x-scale (.f64 (*.f64 angle (PI.f64)) -1/2))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 x-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (pow.f64 y-scale 2))) (pow.f64 b 2))) (.f64 -1/2 (.f64 x-scale (.f64 angle (PI.f64)))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 x-scale (.f64 angle (.f64 (.f64 a a) (PI.f64)))) (/.f64 (pow.f64 x-scale 3) (/.f64 (.f64 y-scale y-scale) (.f64 angle (.f64 (.f64 a a) (PI.f64)))))) (.f64 b b)) (.f64 -1/2 (.f64 x-scale (.f64 angle (PI.f64)))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 angle (.f64 (.f64 (.f64 a a) (PI.f64)) x-scale)) (/.f64 (pow.f64 x-scale 3) (/.f64 (.f64 y-scale y-scale) (.f64 angle (.f64 (.f64 a a) (PI.f64)))))) (.f64 b b)) (.f64 x-scale (.f64 (.f64 angle (PI.f64)) -1/2)))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (.f64 x-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (pow.f64 y-scale 2))) (pow.f64 a 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 4)))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 x-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (pow.f64 y-scale 2))) (pow.f64 b 2))) (.f64 -1/2 (.f64 x-scale (.f64 angle (PI.f64))))))
(fma.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 (.f64 y-scale y-scale) (pow.f64 b 4)) (.f64 (.f64 a a) (-.f64 (.f64 x-scale (.f64 angle (.f64 (.f64 a a) (PI.f64)))) (/.f64 (pow.f64 x-scale 3) (/.f64 (.f64 y-scale y-scale) (.f64 angle (.f64 (.f64 a a) (PI.f64))))))))) (fma.f64 1/2 (/.f64 (-.f64 (.f64 x-scale (.f64 angle (.f64 (.f64 a a) (PI.f64)))) (/.f64 (pow.f64 x-scale 3) (/.f64 (.f64 y-scale y-scale) (.f64 angle (.f64 (.f64 a a) (PI.f64)))))) (.f64 b b)) (.f64 -1/2 (.f64 x-scale (*.f64 angle (PI.f64))))))
(fma.f64 1/2 (.f64 (/.f64 x-scale (/.f64 y-scale (/.f64 x-scale y-scale))) (/.f64 (-.f64 (.f64 angle (.f64 (.f64 (.f64 a a) (PI.f64)) x-scale)) (/.f64 (pow.f64 x-scale 3) (/.f64 (.f64 y-scale y-scale) (.f64 angle (.f64 (.f64 a a) (PI.f64)))))) (/.f64 (pow.f64 b 4) (.f64 a a)))) (fma.f64 1/2 (/.f64 (-.f64 (.f64 angle (.f64 (.f64 (.f64 a a) (PI.f64)) x-scale)) (/.f64 (pow.f64 x-scale 3) (/.f64 (.f64 y-scale y-scale) (.f64 angle (.f64 (.f64 a a) (PI.f64)))))) (.f64 b b)) (.f64 x-scale (.f64 (.f64 angle (PI.f64)) -1/2))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 4) (.f64 (-.f64 (.f64 x-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (pow.f64 y-scale 2))) (pow.f64 a 4))) (.f64 (pow.f64 y-scale 4) (pow.f64 b 6)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (.f64 x-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (pow.f64 y-scale 2))) (pow.f64 a 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 4)))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 x-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (pow.f64 y-scale 2))) (pow.f64 b 2))) (.f64 -1/2 (.f64 x-scale (.f64 angle (PI.f64)))))))
(fma.f64 1/2 (.f64 (/.f64 (pow.f64 x-scale 4) (pow.f64 y-scale 4)) (/.f64 (.f64 (pow.f64 a 4) (-.f64 (.f64 x-scale (.f64 angle (.f64 (.f64 a a) (PI.f64)))) (/.f64 (pow.f64 x-scale 3) (/.f64 (.f64 y-scale y-scale) (.f64 angle (.f64 (.f64 a a) (PI.f64))))))) (pow.f64 b 6))) (fma.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 (.f64 y-scale y-scale) (pow.f64 b 4)) (.f64 (.f64 a a) (-.f64 (.f64 x-scale (.f64 angle (.f64 (.f64 a a) (PI.f64)))) (/.f64 (pow.f64 x-scale 3) (/.f64 (.f64 y-scale y-scale) (.f64 angle (.f64 (.f64 a a) (PI.f64))))))))) (fma.f64 1/2 (/.f64 (-.f64 (.f64 x-scale (.f64 angle (.f64 (.f64 a a) (PI.f64)))) (/.f64 (pow.f64 x-scale 3) (/.f64 (.f64 y-scale y-scale) (.f64 angle (.f64 (.f64 a a) (PI.f64)))))) (.f64 b b)) (.f64 -1/2 (.f64 x-scale (*.f64 angle (PI.f64)))))))
(fma.f64 1/2 (.f64 (/.f64 (pow.f64 x-scale 4) (pow.f64 y-scale 4)) (/.f64 (pow.f64 a 4) (/.f64 (pow.f64 b 6) (-.f64 (.f64 angle (.f64 (.f64 (.f64 a a) (PI.f64)) x-scale)) (/.f64 (pow.f64 x-scale 3) (/.f64 (.f64 y-scale y-scale) (.f64 angle (.f64 (.f64 a a) (PI.f64))))))))) (fma.f64 1/2 (.f64 (/.f64 x-scale (/.f64 y-scale (/.f64 x-scale y-scale))) (/.f64 (-.f64 (.f64 angle (.f64 (.f64 (.f64 a a) (PI.f64)) x-scale)) (/.f64 (pow.f64 x-scale 3) (/.f64 (.f64 y-scale y-scale) (.f64 angle (.f64 (.f64 a a) (PI.f64)))))) (/.f64 (pow.f64 b 4) (.f64 a a)))) (fma.f64 1/2 (/.f64 (-.f64 (.f64 angle (.f64 (.f64 (.f64 a a) (PI.f64)) x-scale)) (/.f64 (pow.f64 x-scale 3) (/.f64 (.f64 y-scale y-scale) (.f64 angle (.f64 (.f64 a a) (PI.f64)))))) (.f64 b b)) (.f64 x-scale (.f64 (*.f64 angle (PI.f64)) -1/2)))))
(.f64 -1/2 (.f64 x-scale (*.f64 angle (PI.f64))))
(.f64 x-scale (.f64 (*.f64 angle (PI.f64)) -1/2))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 x-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (pow.f64 y-scale 2))) (pow.f64 b 2))) (.f64 -1/2 (.f64 x-scale (.f64 angle (PI.f64)))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 x-scale (.f64 angle (.f64 (.f64 a a) (PI.f64)))) (/.f64 (pow.f64 x-scale 3) (/.f64 (.f64 y-scale y-scale) (.f64 angle (.f64 (.f64 a a) (PI.f64)))))) (.f64 b b)) (.f64 -1/2 (.f64 x-scale (.f64 angle (PI.f64)))))
(fma.f64 1/2 (/.f64 (-.f64 (.f64 angle (.f64 (.f64 (.f64 a a) (PI.f64)) x-scale)) (/.f64 (pow.f64 x-scale 3) (/.f64 (.f64 y-scale y-scale) (.f64 angle (.f64 (.f64 a a) (PI.f64)))))) (.f64 b b)) (.f64 x-scale (.f64 (.f64 angle (PI.f64)) -1/2)))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (.f64 x-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (pow.f64 y-scale 2))) (pow.f64 a 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 4)))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 x-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (pow.f64 y-scale 2))) (pow.f64 b 2))) (.f64 -1/2 (.f64 x-scale (.f64 angle (PI.f64))))))
(fma.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 (.f64 y-scale y-scale) (pow.f64 b 4)) (.f64 (.f64 a a) (-.f64 (.f64 x-scale (.f64 angle (.f64 (.f64 a a) (PI.f64)))) (/.f64 (pow.f64 x-scale 3) (/.f64 (.f64 y-scale y-scale) (.f64 angle (.f64 (.f64 a a) (PI.f64))))))))) (fma.f64 1/2 (/.f64 (-.f64 (.f64 x-scale (.f64 angle (.f64 (.f64 a a) (PI.f64)))) (/.f64 (pow.f64 x-scale 3) (/.f64 (.f64 y-scale y-scale) (.f64 angle (.f64 (.f64 a a) (PI.f64)))))) (.f64 b b)) (.f64 -1/2 (.f64 x-scale (*.f64 angle (PI.f64))))))
(fma.f64 1/2 (.f64 (/.f64 x-scale (/.f64 y-scale (/.f64 x-scale y-scale))) (/.f64 (-.f64 (.f64 angle (.f64 (.f64 (.f64 a a) (PI.f64)) x-scale)) (/.f64 (pow.f64 x-scale 3) (/.f64 (.f64 y-scale y-scale) (.f64 angle (.f64 (.f64 a a) (PI.f64)))))) (/.f64 (pow.f64 b 4) (.f64 a a)))) (fma.f64 1/2 (/.f64 (-.f64 (.f64 angle (.f64 (.f64 (.f64 a a) (PI.f64)) x-scale)) (/.f64 (pow.f64 x-scale 3) (/.f64 (.f64 y-scale y-scale) (.f64 angle (.f64 (.f64 a a) (PI.f64)))))) (.f64 b b)) (.f64 x-scale (.f64 (.f64 angle (PI.f64)) -1/2))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 4) (.f64 (-.f64 (.f64 x-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (pow.f64 y-scale 2))) (pow.f64 a 4))) (.f64 (pow.f64 y-scale 4) (pow.f64 b 6)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (.f64 x-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (pow.f64 y-scale 2))) (pow.f64 a 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 4)))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 x-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (pow.f64 y-scale 2))) (pow.f64 b 2))) (.f64 -1/2 (.f64 x-scale (.f64 angle (PI.f64)))))))
(fma.f64 1/2 (.f64 (/.f64 (pow.f64 x-scale 4) (pow.f64 y-scale 4)) (/.f64 (.f64 (pow.f64 a 4) (-.f64 (.f64 x-scale (.f64 angle (.f64 (.f64 a a) (PI.f64)))) (/.f64 (pow.f64 x-scale 3) (/.f64 (.f64 y-scale y-scale) (.f64 angle (.f64 (.f64 a a) (PI.f64))))))) (pow.f64 b 6))) (fma.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 (.f64 y-scale y-scale) (pow.f64 b 4)) (.f64 (.f64 a a) (-.f64 (.f64 x-scale (.f64 angle (.f64 (.f64 a a) (PI.f64)))) (/.f64 (pow.f64 x-scale 3) (/.f64 (.f64 y-scale y-scale) (.f64 angle (.f64 (.f64 a a) (PI.f64))))))))) (fma.f64 1/2 (/.f64 (-.f64 (.f64 x-scale (.f64 angle (.f64 (.f64 a a) (PI.f64)))) (/.f64 (pow.f64 x-scale 3) (/.f64 (.f64 y-scale y-scale) (.f64 angle (.f64 (.f64 a a) (PI.f64)))))) (.f64 b b)) (.f64 -1/2 (.f64 x-scale (*.f64 angle (PI.f64)))))))
(fma.f64 1/2 (.f64 (/.f64 (pow.f64 x-scale 4) (pow.f64 y-scale 4)) (/.f64 (pow.f64 a 4) (/.f64 (pow.f64 b 6) (-.f64 (.f64 angle (.f64 (.f64 (.f64 a a) (PI.f64)) x-scale)) (/.f64 (pow.f64 x-scale 3) (/.f64 (.f64 y-scale y-scale) (.f64 angle (.f64 (.f64 a a) (PI.f64))))))))) (fma.f64 1/2 (.f64 (/.f64 x-scale (/.f64 y-scale (/.f64 x-scale y-scale))) (/.f64 (-.f64 (.f64 angle (.f64 (.f64 (.f64 a a) (PI.f64)) x-scale)) (/.f64 (pow.f64 x-scale 3) (/.f64 (.f64 y-scale y-scale) (.f64 angle (.f64 (.f64 a a) (PI.f64)))))) (/.f64 (pow.f64 b 4) (.f64 a a)))) (fma.f64 1/2 (/.f64 (-.f64 (.f64 angle (.f64 (.f64 (.f64 a a) (PI.f64)) x-scale)) (/.f64 (pow.f64 x-scale 3) (/.f64 (.f64 y-scale y-scale) (.f64 angle (.f64 (.f64 a a) (PI.f64)))))) (.f64 b b)) (.f64 x-scale (.f64 (*.f64 angle (PI.f64)) -1/2)))))
(.f64 -1/2 (.f64 x-scale (*.f64 angle (PI.f64))))
(.f64 x-scale (.f64 (*.f64 angle (PI.f64)) -1/2))
(+.f64 (.f64 1/2 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 x-scale (.f64 angle (PI.f64))) (pow.f64 b 2)) (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 angle (PI.f64))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))))) (.f64 -1/2 (.f64 x-scale (.f64 angle (PI.f64)))))
(fma.f64 1/2 (.f64 (.f64 a a) (-.f64 (/.f64 x-scale (/.f64 (.f64 b b) (.f64 angle (PI.f64)))) (.f64 (/.f64 (pow.f64 x-scale 3) (.f64 y-scale y-scale)) (/.f64 (.f64 angle (PI.f64)) (.f64 b b))))) (.f64 -1/2 (.f64 x-scale (*.f64 angle (PI.f64)))))
(fma.f64 1/2 (.f64 a (.f64 a (-.f64 (/.f64 (.f64 angle (PI.f64)) (/.f64 b (/.f64 x-scale b))) (.f64 (/.f64 (pow.f64 x-scale 3) (.f64 y-scale y-scale)) (/.f64 angle (/.f64 (.f64 b b) (PI.f64))))))) (.f64 x-scale (.f64 (*.f64 angle (PI.f64)) -1/2)))
(+.f64 (.f64 1/2 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 x-scale (.f64 angle (PI.f64))) (pow.f64 b 2)) (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 angle (PI.f64))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 4) (-.f64 (/.f64 (.f64 x-scale (.f64 angle (PI.f64))) (pow.f64 b 2)) (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 angle (PI.f64))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (.f64 -1/2 (.f64 x-scale (*.f64 angle (PI.f64))))))
(fma.f64 1/2 (.f64 (.f64 a a) (-.f64 (/.f64 x-scale (/.f64 (.f64 b b) (.f64 angle (PI.f64)))) (.f64 (/.f64 (pow.f64 x-scale 3) (.f64 y-scale y-scale)) (/.f64 (.f64 angle (PI.f64)) (.f64 b b))))) (fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 a 4) (-.f64 (/.f64 x-scale (/.f64 (.f64 b b) (.f64 angle (PI.f64)))) (.f64 (/.f64 (pow.f64 x-scale 3) (.f64 y-scale y-scale)) (/.f64 (.f64 angle (PI.f64)) (.f64 b b))))) (.f64 b b))) (.f64 -1/2 (.f64 x-scale (.f64 angle (PI.f64))))))
(fma.f64 1/2 (.f64 a (.f64 a (-.f64 (/.f64 (.f64 angle (PI.f64)) (/.f64 b (/.f64 x-scale b))) (.f64 (/.f64 (pow.f64 x-scale 3) (.f64 y-scale y-scale)) (/.f64 angle (/.f64 (.f64 b b) (PI.f64))))))) (fma.f64 1/2 (.f64 (/.f64 x-scale (/.f64 y-scale (/.f64 x-scale y-scale))) (/.f64 (pow.f64 a 4) (/.f64 (.f64 b b) (-.f64 (/.f64 (.f64 angle (PI.f64)) (/.f64 b (/.f64 x-scale b))) (.f64 (/.f64 (pow.f64 x-scale 3) (.f64 y-scale y-scale)) (/.f64 angle (/.f64 (.f64 b b) (PI.f64)))))))) (.f64 x-scale (.f64 (*.f64 angle (PI.f64)) -1/2))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 x-scale (.f64 angle (PI.f64))) (pow.f64 b 2)) (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 angle (PI.f64))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 4) (.f64 (pow.f64 a 6) (-.f64 (/.f64 (.f64 x-scale (.f64 angle (PI.f64))) (pow.f64 b 2)) (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 angle (PI.f64))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))))) (.f64 (pow.f64 y-scale 4) (pow.f64 b 4)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 4) (-.f64 (/.f64 (.f64 x-scale (.f64 angle (PI.f64))) (pow.f64 b 2)) (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 angle (PI.f64))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (.f64 -1/2 (.f64 x-scale (.f64 angle (PI.f64)))))))
(fma.f64 1/2 (.f64 (.f64 a a) (-.f64 (/.f64 x-scale (/.f64 (.f64 b b) (.f64 angle (PI.f64)))) (.f64 (/.f64 (pow.f64 x-scale 3) (.f64 y-scale y-scale)) (/.f64 (.f64 angle (PI.f64)) (.f64 b b))))) (fma.f64 1/2 (.f64 (/.f64 (pow.f64 x-scale 4) (pow.f64 y-scale 4)) (/.f64 (.f64 (-.f64 (/.f64 x-scale (/.f64 (.f64 b b) (.f64 angle (PI.f64)))) (.f64 (/.f64 (pow.f64 x-scale 3) (.f64 y-scale y-scale)) (/.f64 (.f64 angle (PI.f64)) (.f64 b b)))) (pow.f64 a 6)) (pow.f64 b 4))) (fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 a 4) (-.f64 (/.f64 x-scale (/.f64 (.f64 b b) (.f64 angle (PI.f64)))) (.f64 (/.f64 (pow.f64 x-scale 3) (.f64 y-scale y-scale)) (/.f64 (.f64 angle (PI.f64)) (.f64 b b))))) (.f64 b b))) (.f64 -1/2 (.f64 x-scale (.f64 angle (PI.f64)))))))
(fma.f64 1/2 (.f64 a (.f64 a (-.f64 (/.f64 (.f64 angle (PI.f64)) (/.f64 b (/.f64 x-scale b))) (.f64 (/.f64 (pow.f64 x-scale 3) (.f64 y-scale y-scale)) (/.f64 angle (/.f64 (.f64 b b) (PI.f64))))))) (fma.f64 1/2 (.f64 (/.f64 (pow.f64 x-scale 4) (pow.f64 y-scale 4)) (/.f64 (-.f64 (/.f64 (.f64 angle (PI.f64)) (/.f64 b (/.f64 x-scale b))) (.f64 (/.f64 (pow.f64 x-scale 3) (.f64 y-scale y-scale)) (/.f64 angle (/.f64 (.f64 b b) (PI.f64))))) (/.f64 (pow.f64 b 4) (pow.f64 a 6)))) (fma.f64 1/2 (.f64 (/.f64 x-scale (/.f64 y-scale (/.f64 x-scale y-scale))) (/.f64 (pow.f64 a 4) (/.f64 (.f64 b b) (-.f64 (/.f64 (.f64 angle (PI.f64)) (/.f64 b (/.f64 x-scale b))) (.f64 (/.f64 (pow.f64 x-scale 3) (.f64 y-scale y-scale)) (/.f64 angle (/.f64 (.f64 b b) (PI.f64)))))))) (.f64 x-scale (.f64 (.f64 angle (PI.f64)) -1/2)))))
(.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (*.f64 angle (PI.f64))) x-scale))
(.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 x-scale (*.f64 angle (PI.f64)))))
(.f64 -1/2 (/.f64 y-scale (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64)))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) x-scale) (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) (pow.f64 x-scale 3))) (pow.f64 a 2))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (PI.f64))) x-scale)))
(fma.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 y-scale y-scale) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (PI.f64))))) (/.f64 (pow.f64 y-scale 4) (/.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (.f64 b b) (PI.f64)))))) (.f64 a a)) (.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 x-scale (*.f64 angle (PI.f64))))))
(fma.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 angle (.f64 (.f64 b b) (PI.f64))) (/.f64 x-scale (.f64 y-scale y-scale))) (/.f64 (pow.f64 y-scale 4) (/.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (.f64 b b) (PI.f64)))))) (.f64 a a)) (.f64 -1/2 (/.f64 y-scale (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) x-scale) (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) (pow.f64 x-scale 3))) (pow.f64 a 2))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) x-scale) (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) (pow.f64 x-scale 3))) (pow.f64 b 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 a 4)))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (PI.f64))) x-scale))))
(fma.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 y-scale y-scale) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (PI.f64))))) (/.f64 (pow.f64 y-scale 4) (/.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (.f64 b b) (PI.f64)))))) (.f64 a a)) (fma.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 y-scale y-scale) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (PI.f64))))) (/.f64 (pow.f64 y-scale 4) (/.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (.f64 b b) (PI.f64))))))) (pow.f64 a 4))) (.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 x-scale (*.f64 angle (PI.f64)))))))
(fma.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 angle (.f64 (.f64 b b) (PI.f64))) (/.f64 x-scale (.f64 y-scale y-scale))) (/.f64 (pow.f64 y-scale 4) (/.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (.f64 b b) (PI.f64)))))) (.f64 a a)) (fma.f64 1/2 (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (.f64 angle (.f64 (.f64 b b) (PI.f64))) (/.f64 x-scale (.f64 y-scale y-scale))) (/.f64 (pow.f64 y-scale 4) (/.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (.f64 b b) (PI.f64))))))) (/.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 a 4)) (.f64 b b))) (.f64 -1/2 (/.f64 y-scale (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64)))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) x-scale) (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) (pow.f64 x-scale 3))) (pow.f64 b 4))) (.f64 (pow.f64 x-scale 4) (pow.f64 a 6)))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) x-scale) (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) (pow.f64 x-scale 3))) (pow.f64 a 2))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) x-scale) (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) (pow.f64 x-scale 3))) (pow.f64 b 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 a 4)))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (PI.f64))) x-scale)))))
(fma.f64 1/2 (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 x-scale 4)) (/.f64 (.f64 (pow.f64 b 4) (-.f64 (/.f64 (.f64 y-scale y-scale) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (PI.f64))))) (/.f64 (pow.f64 y-scale 4) (/.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (.f64 b b) (PI.f64))))))) (pow.f64 a 6))) (fma.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 y-scale y-scale) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (PI.f64))))) (/.f64 (pow.f64 y-scale 4) (/.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (.f64 b b) (PI.f64)))))) (.f64 a a)) (fma.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 y-scale y-scale) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (PI.f64))))) (/.f64 (pow.f64 y-scale 4) (/.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (.f64 b b) (PI.f64))))))) (pow.f64 a 4))) (.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 x-scale (.f64 angle (PI.f64))))))))
(fma.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 4) (-.f64 (/.f64 (.f64 angle (.f64 (.f64 b b) (PI.f64))) (/.f64 x-scale (.f64 y-scale y-scale))) (/.f64 (pow.f64 y-scale 4) (/.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (.f64 b b) (PI.f64))))))) (/.f64 (.f64 (pow.f64 x-scale 4) (pow.f64 a 6)) (pow.f64 b 4))) (fma.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 angle (.f64 (.f64 b b) (PI.f64))) (/.f64 x-scale (.f64 y-scale y-scale))) (/.f64 (pow.f64 y-scale 4) (/.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (.f64 b b) (PI.f64)))))) (.f64 a a)) (fma.f64 1/2 (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (.f64 angle (.f64 (.f64 b b) (PI.f64))) (/.f64 x-scale (.f64 y-scale y-scale))) (/.f64 (pow.f64 y-scale 4) (/.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (.f64 b b) (PI.f64))))))) (/.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 a 4)) (.f64 b b))) (.f64 -1/2 (/.f64 y-scale (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))))))))
(.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (*.f64 angle (PI.f64))) x-scale))
(.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 x-scale (*.f64 angle (PI.f64)))))
(.f64 -1/2 (/.f64 y-scale (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64)))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) x-scale) (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) (pow.f64 x-scale 3))) (pow.f64 a 2))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (PI.f64))) x-scale)))
(fma.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 y-scale y-scale) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (PI.f64))))) (/.f64 (pow.f64 y-scale 4) (/.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (.f64 b b) (PI.f64)))))) (.f64 a a)) (.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 x-scale (*.f64 angle (PI.f64))))))
(fma.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 angle (.f64 (.f64 b b) (PI.f64))) (/.f64 x-scale (.f64 y-scale y-scale))) (/.f64 (pow.f64 y-scale 4) (/.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (.f64 b b) (PI.f64)))))) (.f64 a a)) (.f64 -1/2 (/.f64 y-scale (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))))))
(+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) x-scale) (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) (pow.f64 x-scale 3))) (pow.f64 a 2))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) x-scale) (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) (pow.f64 x-scale 3))) (pow.f64 b 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 a 4)))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (PI.f64))) x-scale))))
(fma.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 y-scale y-scale) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (PI.f64))))) (/.f64 (pow.f64 y-scale 4) (/.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (.f64 b b) (PI.f64)))))) (.f64 a a)) (fma.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 y-scale y-scale) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (PI.f64))))) (/.f64 (pow.f64 y-scale 4) (/.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (.f64 b b) (PI.f64))))))) (pow.f64 a 4))) (.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 x-scale (*.f64 angle (PI.f64)))))))
(fma.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 angle (.f64 (.f64 b b) (PI.f64))) (/.f64 x-scale (.f64 y-scale y-scale))) (/.f64 (pow.f64 y-scale 4) (/.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (.f64 b b) (PI.f64)))))) (.f64 a a)) (fma.f64 1/2 (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (.f64 angle (.f64 (.f64 b b) (PI.f64))) (/.f64 x-scale (.f64 y-scale y-scale))) (/.f64 (pow.f64 y-scale 4) (/.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (.f64 b b) (PI.f64))))))) (/.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 a 4)) (.f64 b b))) (.f64 -1/2 (/.f64 y-scale (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64)))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) x-scale) (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) (pow.f64 x-scale 3))) (pow.f64 b 4))) (.f64 (pow.f64 x-scale 4) (pow.f64 a 6)))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) x-scale) (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) (pow.f64 x-scale 3))) (pow.f64 a 2))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) x-scale) (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) (pow.f64 x-scale 3))) (pow.f64 b 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 a 4)))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (PI.f64))) x-scale)))))
(fma.f64 1/2 (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 x-scale 4)) (/.f64 (.f64 (pow.f64 b 4) (-.f64 (/.f64 (.f64 y-scale y-scale) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (PI.f64))))) (/.f64 (pow.f64 y-scale 4) (/.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (.f64 b b) (PI.f64))))))) (pow.f64 a 6))) (fma.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 y-scale y-scale) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (PI.f64))))) (/.f64 (pow.f64 y-scale 4) (/.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (.f64 b b) (PI.f64)))))) (.f64 a a)) (fma.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 y-scale y-scale) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (PI.f64))))) (/.f64 (pow.f64 y-scale 4) (/.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (.f64 b b) (PI.f64))))))) (pow.f64 a 4))) (.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 x-scale (.f64 angle (PI.f64))))))))
(fma.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 4) (-.f64 (/.f64 (.f64 angle (.f64 (.f64 b b) (PI.f64))) (/.f64 x-scale (.f64 y-scale y-scale))) (/.f64 (pow.f64 y-scale 4) (/.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (.f64 b b) (PI.f64))))))) (/.f64 (.f64 (pow.f64 x-scale 4) (pow.f64 a 6)) (pow.f64 b 4))) (fma.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 angle (.f64 (.f64 b b) (PI.f64))) (/.f64 x-scale (.f64 y-scale y-scale))) (/.f64 (pow.f64 y-scale 4) (/.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (.f64 b b) (PI.f64)))))) (.f64 a a)) (fma.f64 1/2 (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (.f64 angle (.f64 (.f64 b b) (PI.f64))) (/.f64 x-scale (.f64 y-scale y-scale))) (/.f64 (pow.f64 y-scale 4) (/.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (.f64 b b) (PI.f64))))))) (/.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 a 4)) (.f64 b b))) (.f64 -1/2 (/.f64 y-scale (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))))))))
(.f64 -1/2 (/.f64 (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (pow.f64 b 2)))
(.f64 -1/2 (/.f64 x-scale (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))
(.f64 -1/2 (/.f64 x-scale (/.f64 (.f64 b b) (.f64 angle (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64)))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (pow.f64 a 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 4)))) (.f64 -1/2 (/.f64 (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (pow.f64 b 2))))
(.f64 -1/2 (+.f64 (.f64 (/.f64 (pow.f64 x-scale 3) (.f64 y-scale y-scale)) (/.f64 (.f64 angle (.f64 (.f64 a a) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 b 4))) (/.f64 x-scale (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
(.f64 -1/2 (+.f64 (/.f64 x-scale (/.f64 (.f64 b b) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) (.f64 (/.f64 (pow.f64 x-scale 3) (.f64 y-scale y-scale)) (/.f64 angle (/.f64 (pow.f64 b 4) (.f64 a (.f64 a (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64))))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (pow.f64 a 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 4)))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 5) (.f64 angle (.f64 (pow.f64 a 4) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 (pow.f64 y-scale 4) (pow.f64 b 6)))) (.f64 -1/2 (/.f64 (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (pow.f64 b 2)))))
(fma.f64 -1/2 (.f64 (/.f64 (pow.f64 x-scale 3) (.f64 y-scale y-scale)) (/.f64 (.f64 angle (.f64 (.f64 a a) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 b 4))) (.f64 -1/2 (+.f64 (.f64 (/.f64 (pow.f64 x-scale 5) (pow.f64 y-scale 4)) (/.f64 (.f64 angle (.f64 (pow.f64 a 4) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 b 6))) (/.f64 x-scale (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))
(fma.f64 -1/2 (.f64 (/.f64 (pow.f64 x-scale 3) (.f64 y-scale y-scale)) (/.f64 angle (/.f64 (pow.f64 b 4) (.f64 a (.f64 a (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))))) (.f64 -1/2 (+.f64 (/.f64 x-scale (/.f64 (.f64 b b) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) (.f64 (/.f64 (pow.f64 x-scale 5) (pow.f64 y-scale 4)) (/.f64 angle (/.f64 (pow.f64 b 6) (.f64 (pow.f64 a 4) (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64))))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (pow.f64 a 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 4)))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 5) (.f64 angle (.f64 (pow.f64 a 4) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 (pow.f64 y-scale 4) (pow.f64 b 6)))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 7) (.f64 angle (.f64 (pow.f64 a 6) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 (pow.f64 y-scale 6) (pow.f64 b 8)))) (.f64 -1/2 (/.f64 (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (pow.f64 b 2))))))
(fma.f64 -1/2 (.f64 (/.f64 (pow.f64 x-scale 3) (.f64 y-scale y-scale)) (/.f64 (.f64 angle (.f64 (.f64 a a) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 b 4))) (fma.f64 -1/2 (.f64 (/.f64 (pow.f64 x-scale 5) (pow.f64 y-scale 4)) (/.f64 (.f64 angle (.f64 (pow.f64 a 4) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 b 6))) (.f64 -1/2 (+.f64 (.f64 (/.f64 (pow.f64 x-scale 7) (pow.f64 y-scale 6)) (/.f64 (.f64 angle (.f64 (pow.f64 a 6) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 b 8))) (/.f64 x-scale (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))))
(fma.f64 -1/2 (.f64 (/.f64 (pow.f64 x-scale 3) (.f64 y-scale y-scale)) (/.f64 angle (/.f64 (pow.f64 b 4) (.f64 a (.f64 a (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))))) (fma.f64 -1/2 (.f64 (/.f64 (pow.f64 x-scale 5) (pow.f64 y-scale 4)) (/.f64 angle (/.f64 (pow.f64 b 6) (.f64 (pow.f64 a 4) (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))))) (.f64 -1/2 (+.f64 (/.f64 x-scale (/.f64 (.f64 b b) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) (.f64 (/.f64 (pow.f64 x-scale 7) (pow.f64 y-scale 6)) (/.f64 (.f64 (pow.f64 a 6) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (pow.f64 b 8)))))))
(.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (*.f64 x-scale (pow.f64 a 2))))
(.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) x-scale) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 a a))))
(.f64 1/2 (/.f64 y-scale (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 angle (.f64 (pow.f64 b 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 (pow.f64 x-scale 3) (pow.f64 a 4)))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (*.f64 x-scale (pow.f64 a 2)))))
(.f64 1/2 (+.f64 (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 x-scale 3)) (/.f64 (.f64 angle (.f64 (.f64 b b) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 a 4))) (.f64 (/.f64 (.f64 y-scale y-scale) x-scale) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (*.f64 a a)))))
(.f64 1/2 (+.f64 (/.f64 y-scale (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))))) (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 x-scale 3)) (/.f64 angle (/.f64 (pow.f64 a 4) (.f64 b (.f64 b (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64))))))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 angle (.f64 (pow.f64 b 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 (pow.f64 x-scale 3) (pow.f64 a 4)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 angle (.f64 (pow.f64 b 4) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 (pow.f64 x-scale 5) (pow.f64 a 6)))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (*.f64 x-scale (pow.f64 a 2))))))
(fma.f64 1/2 (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 x-scale 3)) (/.f64 (.f64 angle (.f64 (.f64 b b) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 a 4))) (.f64 1/2 (+.f64 (.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 5)) (/.f64 (.f64 angle (.f64 (pow.f64 b 4) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 a 6))) (.f64 (/.f64 (.f64 y-scale y-scale) x-scale) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (*.f64 a a))))))
(fma.f64 1/2 (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 x-scale 3)) (/.f64 angle (/.f64 (pow.f64 a 4) (.f64 b (.f64 b (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))))) (.f64 1/2 (+.f64 (/.f64 y-scale (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))))) (.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 5)) (/.f64 angle (/.f64 (pow.f64 a 6) (.f64 (pow.f64 b 4) (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64))))))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 angle (.f64 (pow.f64 b 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 (pow.f64 x-scale 3) (pow.f64 a 4)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 angle (.f64 (pow.f64 b 4) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 (pow.f64 x-scale 5) (pow.f64 a 6)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 8) (.f64 angle (.f64 (pow.f64 b 6) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 (pow.f64 x-scale 7) (pow.f64 a 8)))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (*.f64 x-scale (pow.f64 a 2)))))))
(fma.f64 1/2 (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 x-scale 3)) (/.f64 (.f64 angle (.f64 (.f64 b b) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 a 4))) (fma.f64 1/2 (.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 5)) (/.f64 (.f64 angle (.f64 (pow.f64 b 4) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 a 6))) (.f64 1/2 (+.f64 (.f64 (/.f64 (pow.f64 y-scale 8) (pow.f64 x-scale 7)) (/.f64 (.f64 angle (.f64 (pow.f64 b 6) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 a 8))) (.f64 (/.f64 (.f64 y-scale y-scale) x-scale) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (*.f64 a a)))))))
(fma.f64 1/2 (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 x-scale 3)) (/.f64 angle (/.f64 (pow.f64 a 4) (.f64 b (.f64 b (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))))) (fma.f64 1/2 (.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 5)) (/.f64 angle (/.f64 (pow.f64 a 6) (.f64 (pow.f64 b 4) (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))))) (.f64 1/2 (+.f64 (/.f64 y-scale (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))))) (/.f64 (.f64 (/.f64 (pow.f64 y-scale 8) (pow.f64 x-scale 7)) (.f64 angle (.f64 (pow.f64 b 6) (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) (pow.f64 a 8))))))
(.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (*.f64 x-scale (pow.f64 a 2))))
(.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) x-scale) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 a a))))
(.f64 1/2 (/.f64 y-scale (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 angle (.f64 (pow.f64 b 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 (pow.f64 x-scale 3) (pow.f64 a 4)))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (*.f64 x-scale (pow.f64 a 2)))))
(.f64 1/2 (+.f64 (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 x-scale 3)) (/.f64 (.f64 angle (.f64 (.f64 b b) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 a 4))) (.f64 (/.f64 (.f64 y-scale y-scale) x-scale) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (*.f64 a a)))))
(.f64 1/2 (+.f64 (/.f64 y-scale (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))))) (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 x-scale 3)) (/.f64 angle (/.f64 (pow.f64 a 4) (.f64 b (.f64 b (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64))))))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 angle (.f64 (pow.f64 b 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 (pow.f64 x-scale 3) (pow.f64 a 4)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 angle (.f64 (pow.f64 b 4) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 (pow.f64 x-scale 5) (pow.f64 a 6)))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (*.f64 x-scale (pow.f64 a 2))))))
(fma.f64 1/2 (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 x-scale 3)) (/.f64 (.f64 angle (.f64 (.f64 b b) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 a 4))) (.f64 1/2 (+.f64 (.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 5)) (/.f64 (.f64 angle (.f64 (pow.f64 b 4) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 a 6))) (.f64 (/.f64 (.f64 y-scale y-scale) x-scale) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (*.f64 a a))))))
(fma.f64 1/2 (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 x-scale 3)) (/.f64 angle (/.f64 (pow.f64 a 4) (.f64 b (.f64 b (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))))) (.f64 1/2 (+.f64 (/.f64 y-scale (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))))) (.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 5)) (/.f64 angle (/.f64 (pow.f64 a 6) (.f64 (pow.f64 b 4) (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64))))))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 angle (.f64 (pow.f64 b 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 (pow.f64 x-scale 3) (pow.f64 a 4)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 angle (.f64 (pow.f64 b 4) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 (pow.f64 x-scale 5) (pow.f64 a 6)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 8) (.f64 angle (.f64 (pow.f64 b 6) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 (pow.f64 x-scale 7) (pow.f64 a 8)))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (*.f64 x-scale (pow.f64 a 2)))))))
(fma.f64 1/2 (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 x-scale 3)) (/.f64 (.f64 angle (.f64 (.f64 b b) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 a 4))) (fma.f64 1/2 (.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 5)) (/.f64 (.f64 angle (.f64 (pow.f64 b 4) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 a 6))) (.f64 1/2 (+.f64 (.f64 (/.f64 (pow.f64 y-scale 8) (pow.f64 x-scale 7)) (/.f64 (.f64 angle (.f64 (pow.f64 b 6) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 a 8))) (.f64 (/.f64 (.f64 y-scale y-scale) x-scale) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (*.f64 a a)))))))
(fma.f64 1/2 (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 x-scale 3)) (/.f64 angle (/.f64 (pow.f64 a 4) (.f64 b (.f64 b (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))))) (fma.f64 1/2 (.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 5)) (/.f64 angle (/.f64 (pow.f64 a 6) (.f64 (pow.f64 b 4) (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))))) (.f64 1/2 (+.f64 (/.f64 y-scale (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))))) (/.f64 (.f64 (/.f64 (pow.f64 y-scale 8) (pow.f64 x-scale 7)) (.f64 angle (.f64 (pow.f64 b 6) (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) (pow.f64 a 8))))))
(.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (*.f64 x-scale (pow.f64 a 2))))
(.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) x-scale) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 a a))))
(.f64 1/2 (/.f64 y-scale (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 x-scale (pow.f64 a 2)))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (pow.f64 b 2) (PI.f64))))) (*.f64 (pow.f64 x-scale 3) (pow.f64 a 4)))))
(.f64 1/2 (+.f64 (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 x-scale 3)) (/.f64 (.f64 angle (.f64 (.f64 b b) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 a 4))) (.f64 (/.f64 (.f64 y-scale y-scale) x-scale) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (*.f64 a a)))))
(.f64 1/2 (+.f64 (/.f64 y-scale (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))))) (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 x-scale 3)) (/.f64 angle (/.f64 (pow.f64 a 4) (.f64 b (.f64 b (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64))))))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 angle (.f64 (pow.f64 b 4) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 (pow.f64 x-scale 5) (pow.f64 a 6)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 x-scale (pow.f64 a 2)))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (pow.f64 b 2) (PI.f64))))) (*.f64 (pow.f64 x-scale 3) (pow.f64 a 4))))))
(fma.f64 1/2 (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 x-scale 3)) (/.f64 (.f64 angle (.f64 (.f64 b b) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 a 4))) (.f64 1/2 (+.f64 (.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 5)) (/.f64 (.f64 angle (.f64 (pow.f64 b 4) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 a 6))) (.f64 (/.f64 (.f64 y-scale y-scale) x-scale) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (*.f64 a a))))))
(fma.f64 1/2 (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 x-scale 3)) (/.f64 angle (/.f64 (pow.f64 a 4) (.f64 b (.f64 b (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))))) (.f64 1/2 (+.f64 (/.f64 y-scale (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))))) (.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 5)) (/.f64 angle (/.f64 (pow.f64 a 6) (.f64 (pow.f64 b 4) (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64))))))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 angle (.f64 (pow.f64 b 4) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 (pow.f64 x-scale 5) (pow.f64 a 6)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 x-scale (pow.f64 a 2)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (pow.f64 b 2) (PI.f64))))) (.f64 (pow.f64 x-scale 3) (pow.f64 a 4)))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 8) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (pow.f64 b 6) (PI.f64))))) (*.f64 (pow.f64 x-scale 7) (pow.f64 a 8)))))))
(fma.f64 1/2 (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 x-scale 3)) (/.f64 (.f64 angle (.f64 (.f64 b b) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 a 4))) (fma.f64 1/2 (.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 5)) (/.f64 (.f64 angle (.f64 (pow.f64 b 4) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 a 6))) (.f64 1/2 (+.f64 (.f64 (/.f64 (pow.f64 y-scale 8) (pow.f64 x-scale 7)) (/.f64 (.f64 angle (.f64 (pow.f64 b 6) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 a 8))) (.f64 (/.f64 (.f64 y-scale y-scale) x-scale) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (*.f64 a a)))))))
(fma.f64 1/2 (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 x-scale 3)) (/.f64 angle (/.f64 (pow.f64 a 4) (.f64 b (.f64 b (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))))) (fma.f64 1/2 (.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 5)) (/.f64 angle (/.f64 (pow.f64 a 6) (.f64 (pow.f64 b 4) (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))))) (.f64 1/2 (+.f64 (/.f64 y-scale (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))))) (/.f64 (.f64 (/.f64 (pow.f64 y-scale 8) (pow.f64 x-scale 7)) (.f64 angle (.f64 (pow.f64 b 6) (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) (pow.f64 a 8))))))
(.f64 -1/2 (/.f64 (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (pow.f64 b 2)))
(.f64 -1/2 (/.f64 x-scale (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))
(.f64 -1/2 (/.f64 x-scale (/.f64 (.f64 b b) (.f64 angle (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64)))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (pow.f64 a 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 4)))) (.f64 -1/2 (/.f64 (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (pow.f64 b 2))))
(.f64 -1/2 (+.f64 (.f64 (/.f64 (pow.f64 x-scale 3) (.f64 y-scale y-scale)) (/.f64 (.f64 angle (.f64 (.f64 a a) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 b 4))) (/.f64 x-scale (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
(.f64 -1/2 (+.f64 (/.f64 x-scale (/.f64 (.f64 b b) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) (.f64 (/.f64 (pow.f64 x-scale 3) (.f64 y-scale y-scale)) (/.f64 angle (/.f64 (pow.f64 b 4) (.f64 a (.f64 a (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64))))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (pow.f64 a 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 4)))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 5) (.f64 angle (.f64 (pow.f64 a 4) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 (pow.f64 y-scale 4) (pow.f64 b 6)))) (.f64 -1/2 (/.f64 (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (pow.f64 b 2)))))
(fma.f64 -1/2 (.f64 (/.f64 (pow.f64 x-scale 3) (.f64 y-scale y-scale)) (/.f64 (.f64 angle (.f64 (.f64 a a) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 b 4))) (.f64 -1/2 (+.f64 (.f64 (/.f64 (pow.f64 x-scale 5) (pow.f64 y-scale 4)) (/.f64 (.f64 angle (.f64 (pow.f64 a 4) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 b 6))) (/.f64 x-scale (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))
(fma.f64 -1/2 (.f64 (/.f64 (pow.f64 x-scale 3) (.f64 y-scale y-scale)) (/.f64 angle (/.f64 (pow.f64 b 4) (.f64 a (.f64 a (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))))) (.f64 -1/2 (+.f64 (/.f64 x-scale (/.f64 (.f64 b b) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) (.f64 (/.f64 (pow.f64 x-scale 5) (pow.f64 y-scale 4)) (/.f64 angle (/.f64 (pow.f64 b 6) (.f64 (pow.f64 a 4) (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64))))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (pow.f64 a 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 4)))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 5) (.f64 angle (.f64 (pow.f64 a 4) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 (pow.f64 y-scale 4) (pow.f64 b 6)))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 7) (.f64 angle (.f64 (pow.f64 a 6) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 (pow.f64 y-scale 6) (pow.f64 b 8)))) (.f64 -1/2 (/.f64 (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (pow.f64 b 2))))))
(fma.f64 -1/2 (.f64 (/.f64 (pow.f64 x-scale 3) (.f64 y-scale y-scale)) (/.f64 (.f64 angle (.f64 (.f64 a a) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 b 4))) (fma.f64 -1/2 (.f64 (/.f64 (pow.f64 x-scale 5) (pow.f64 y-scale 4)) (/.f64 (.f64 angle (.f64 (pow.f64 a 4) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 b 6))) (.f64 -1/2 (+.f64 (.f64 (/.f64 (pow.f64 x-scale 7) (pow.f64 y-scale 6)) (/.f64 (.f64 angle (.f64 (pow.f64 a 6) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 b 8))) (/.f64 x-scale (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))))
(fma.f64 -1/2 (.f64 (/.f64 (pow.f64 x-scale 3) (.f64 y-scale y-scale)) (/.f64 angle (/.f64 (pow.f64 b 4) (.f64 a (.f64 a (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))))) (fma.f64 -1/2 (.f64 (/.f64 (pow.f64 x-scale 5) (pow.f64 y-scale 4)) (/.f64 angle (/.f64 (pow.f64 b 6) (.f64 (pow.f64 a 4) (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))))) (.f64 -1/2 (+.f64 (/.f64 x-scale (/.f64 (.f64 b b) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) (.f64 (/.f64 (pow.f64 x-scale 7) (pow.f64 y-scale 6)) (/.f64 (.f64 (pow.f64 a 6) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (pow.f64 b 8)))))))
(.f64 -1/2 (/.f64 (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (pow.f64 b 2)))
(.f64 -1/2 (/.f64 x-scale (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))
(.f64 -1/2 (/.f64 x-scale (/.f64 (.f64 b b) (.f64 angle (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64)))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (pow.f64 a 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 4)))) (.f64 -1/2 (/.f64 (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (pow.f64 b 2))))
(.f64 -1/2 (+.f64 (.f64 (/.f64 (pow.f64 x-scale 3) (.f64 y-scale y-scale)) (/.f64 (.f64 angle (.f64 (.f64 a a) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 b 4))) (/.f64 x-scale (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
(.f64 -1/2 (+.f64 (/.f64 x-scale (/.f64 (.f64 b b) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) (.f64 (/.f64 (pow.f64 x-scale 3) (.f64 y-scale y-scale)) (/.f64 angle (/.f64 (pow.f64 b 4) (.f64 a (.f64 a (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64))))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (pow.f64 a 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 4)))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 5) (.f64 angle (.f64 (pow.f64 a 4) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 (pow.f64 y-scale 4) (pow.f64 b 6)))) (.f64 -1/2 (/.f64 (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (pow.f64 b 2)))))
(fma.f64 -1/2 (.f64 (/.f64 (pow.f64 x-scale 3) (.f64 y-scale y-scale)) (/.f64 (.f64 angle (.f64 (.f64 a a) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 b 4))) (.f64 -1/2 (+.f64 (.f64 (/.f64 (pow.f64 x-scale 5) (pow.f64 y-scale 4)) (/.f64 (.f64 angle (.f64 (pow.f64 a 4) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 b 6))) (/.f64 x-scale (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))
(fma.f64 -1/2 (.f64 (/.f64 (pow.f64 x-scale 3) (.f64 y-scale y-scale)) (/.f64 angle (/.f64 (pow.f64 b 4) (.f64 a (.f64 a (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))))) (.f64 -1/2 (+.f64 (/.f64 x-scale (/.f64 (.f64 b b) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) (.f64 (/.f64 (pow.f64 x-scale 5) (pow.f64 y-scale 4)) (/.f64 angle (/.f64 (pow.f64 b 6) (.f64 (pow.f64 a 4) (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64))))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 angle (.f64 (pow.f64 a 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 4)))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 5) (.f64 angle (.f64 (pow.f64 a 4) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 (pow.f64 y-scale 4) (pow.f64 b 6)))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 7) (.f64 angle (.f64 (pow.f64 a 6) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 (pow.f64 y-scale 6) (pow.f64 b 8)))) (.f64 -1/2 (/.f64 (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (pow.f64 b 2))))))
(fma.f64 -1/2 (.f64 (/.f64 (pow.f64 x-scale 3) (.f64 y-scale y-scale)) (/.f64 (.f64 angle (.f64 (.f64 a a) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 b 4))) (fma.f64 -1/2 (.f64 (/.f64 (pow.f64 x-scale 5) (pow.f64 y-scale 4)) (/.f64 (.f64 angle (.f64 (pow.f64 a 4) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 b 6))) (.f64 -1/2 (+.f64 (.f64 (/.f64 (pow.f64 x-scale 7) (pow.f64 y-scale 6)) (/.f64 (.f64 angle (.f64 (pow.f64 a 6) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 b 8))) (/.f64 x-scale (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))))
(fma.f64 -1/2 (.f64 (/.f64 (pow.f64 x-scale 3) (.f64 y-scale y-scale)) (/.f64 angle (/.f64 (pow.f64 b 4) (.f64 a (.f64 a (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))))) (fma.f64 -1/2 (.f64 (/.f64 (pow.f64 x-scale 5) (pow.f64 y-scale 4)) (/.f64 angle (/.f64 (pow.f64 b 6) (.f64 (pow.f64 a 4) (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))))) (.f64 -1/2 (+.f64 (/.f64 x-scale (/.f64 (.f64 b b) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) (.f64 (/.f64 (pow.f64 x-scale 7) (pow.f64 y-scale 6)) (/.f64 (.f64 (pow.f64 a 6) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (pow.f64 b 8)))))))
(/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))
(.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)))))
(.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))
(.f64 -2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 -2 (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64))) x-scale))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)))))
(.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))
(.f64 -2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 -2 (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64))) x-scale))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))
(.f64 2 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 y-scale (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))
(.f64 2 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 y-scale (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))
(.f64 2 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 y-scale (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))
(.f64 2 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 y-scale (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))
(.f64 2 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 y-scale (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))
(.f64 2 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 y-scale (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))
(.f64 2 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 y-scale (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))
(.f64 2 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 y-scale (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))
(.f64 2 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 y-scale (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))
(.f64 2 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 y-scale (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))
(.f64 2 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 y-scale (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))
(.f64 2 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 y-scale (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale))))
(.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -2 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))))
(+.f64 (.f64 2 (.f64 (-.f64 (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64))))) (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))))) (pow.f64 b 2))) (.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64))))))
(fma.f64 2 (.f64 (.f64 b b) (-.f64 (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (.f64 a a) (PI.f64))))) (/.f64 x-scale (.f64 (.f64 y-scale angle) (.f64 (.f64 a a) (PI.f64)))))) (.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64))))))
(fma.f64 2 (.f64 b (.f64 b (-.f64 (/.f64 y-scale (.f64 angle (.f64 (.f64 (.f64 a a) (PI.f64)) x-scale))) (/.f64 x-scale (.f64 angle (.f64 (.f64 (.f64 a a) (PI.f64)) y-scale)))))) (.f64 -2 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64)))))
(+.f64 (.f64 2 (.f64 (-.f64 (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64))))) (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))))) (pow.f64 b 2))) (+.f64 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))) (.f64 2 (/.f64 (.f64 (-.f64 (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64))))) (/.f64 x-scale (.f64 y-scale (.f64 angle (*.f64 (pow.f64 a 2) (PI.f64)))))) (pow.f64 b 4)) (pow.f64 a 2)))))
(fma.f64 2 (.f64 (.f64 b b) (-.f64 (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (.f64 a a) (PI.f64))))) (/.f64 x-scale (.f64 (.f64 y-scale angle) (.f64 (.f64 a a) (PI.f64)))))) (fma.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 2 (/.f64 (-.f64 (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (.f64 a a) (PI.f64))))) (/.f64 x-scale (.f64 (.f64 y-scale angle) (.f64 (.f64 a a) (PI.f64))))) (/.f64 (.f64 a a) (pow.f64 b 4))))))
(fma.f64 2 (.f64 b (.f64 b (-.f64 (/.f64 y-scale (.f64 angle (.f64 (.f64 (.f64 a a) (PI.f64)) x-scale))) (/.f64 x-scale (.f64 angle (.f64 (.f64 (.f64 a a) (PI.f64)) y-scale)))))) (fma.f64 -2 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) (.f64 2 (/.f64 (-.f64 (/.f64 y-scale (.f64 angle (.f64 (.f64 (.f64 a a) (PI.f64)) x-scale))) (/.f64 x-scale (.f64 angle (.f64 (.f64 (.f64 a a) (PI.f64)) y-scale)))) (/.f64 a (/.f64 (pow.f64 b 4) a))))))
(+.f64 (.f64 2 (.f64 (-.f64 (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64))))) (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))))) (pow.f64 b 2))) (+.f64 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))) (+.f64 (.f64 2 (/.f64 (.f64 (-.f64 (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64))))) (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))))) (pow.f64 b 6)) (pow.f64 a 4))) (.f64 2 (/.f64 (.f64 (-.f64 (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64))))) (/.f64 x-scale (.f64 y-scale (.f64 angle (*.f64 (pow.f64 a 2) (PI.f64)))))) (pow.f64 b 4)) (pow.f64 a 2))))))
(fma.f64 2 (.f64 (.f64 b b) (-.f64 (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (.f64 a a) (PI.f64))))) (/.f64 x-scale (.f64 (.f64 y-scale angle) (.f64 (.f64 a a) (PI.f64)))))) (fma.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 2 (+.f64 (/.f64 (-.f64 (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (.f64 a a) (PI.f64))))) (/.f64 x-scale (.f64 (.f64 y-scale angle) (.f64 (.f64 a a) (PI.f64))))) (/.f64 (pow.f64 a 4) (pow.f64 b 6))) (/.f64 (-.f64 (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (.f64 a a) (PI.f64))))) (/.f64 x-scale (.f64 (.f64 y-scale angle) (.f64 (.f64 a a) (PI.f64))))) (/.f64 (.f64 a a) (pow.f64 b 4)))))))
(fma.f64 2 (.f64 b (.f64 b (-.f64 (/.f64 y-scale (.f64 angle (.f64 (.f64 (.f64 a a) (PI.f64)) x-scale))) (/.f64 x-scale (.f64 angle (.f64 (.f64 (.f64 a a) (PI.f64)) y-scale)))))) (fma.f64 -2 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) (.f64 2 (+.f64 (/.f64 (-.f64 (/.f64 y-scale (.f64 angle (.f64 (.f64 (.f64 a a) (PI.f64)) x-scale))) (/.f64 x-scale (.f64 angle (.f64 (.f64 (.f64 a a) (PI.f64)) y-scale)))) (/.f64 a (/.f64 (pow.f64 b 4) a))) (/.f64 (-.f64 (/.f64 y-scale (.f64 angle (.f64 (.f64 (.f64 a a) (PI.f64)) x-scale))) (/.f64 x-scale (.f64 angle (.f64 (.f64 (.f64 a a) (PI.f64)) y-scale)))) (/.f64 (pow.f64 a 4) (pow.f64 b 6)))))))
(.f64 -2 (/.f64 y-scale (.f64 x-scale (*.f64 angle (PI.f64)))))
(/.f64 -2 (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale))
(+.f64 (.f64 2 (/.f64 (-.f64 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 x-scale (.f64 angle (PI.f64))))) (pow.f64 b 2))) (.f64 -2 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64))))))
(fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64))))) (.f64 b b)) (.f64 -2 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64))))))
(fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 a a) (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale))) (.f64 b b)) (/.f64 -2 (/.f64 (.f64 angle (*.f64 (PI.f64) x-scale)) y-scale)))
(+.f64 (.f64 2 (/.f64 (-.f64 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 x-scale (.f64 angle (PI.f64))))) (pow.f64 b 2))) (+.f64 (.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 x-scale (.f64 angle (PI.f64))))) (pow.f64 a 2)) (pow.f64 b 4))) (.f64 -2 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64)))))))
(fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64))))) (.f64 b b)) (fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64))))) (/.f64 (pow.f64 b 4) (.f64 a a))) (.f64 -2 (/.f64 y-scale (.f64 x-scale (*.f64 angle (PI.f64)))))))
(fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 a a) (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale))) (.f64 b b)) (fma.f64 2 (/.f64 (.f64 a a) (/.f64 (pow.f64 b 4) (-.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 a a) (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale))))) (/.f64 -2 (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale))))
(+.f64 (.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 x-scale (.f64 angle (PI.f64))))) (pow.f64 a 4)) (pow.f64 b 6))) (+.f64 (.f64 2 (/.f64 (-.f64 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 x-scale (.f64 angle (PI.f64))))) (pow.f64 b 2))) (+.f64 (.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 x-scale (.f64 angle (PI.f64))))) (pow.f64 a 2)) (pow.f64 b 4))) (.f64 -2 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64))))))))
(fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64))))) (/.f64 (pow.f64 b 6) (pow.f64 a 4))) (fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64))))) (.f64 b b)) (fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64))))) (/.f64 (pow.f64 b 4) (.f64 a a))) (.f64 -2 (/.f64 y-scale (.f64 x-scale (*.f64 angle (PI.f64))))))))
(fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 a a) (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale))) (/.f64 (pow.f64 b 6) (pow.f64 a 4))) (fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 a a) (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale))) (.f64 b b)) (fma.f64 2 (/.f64 (.f64 a a) (/.f64 (pow.f64 b 4) (-.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 a a) (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale))))) (/.f64 -2 (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale)))))
(.f64 -2 (/.f64 y-scale (.f64 x-scale (*.f64 angle (PI.f64)))))
(/.f64 -2 (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale))
(+.f64 (.f64 2 (/.f64 (-.f64 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 x-scale (.f64 angle (PI.f64))))) (pow.f64 b 2))) (.f64 -2 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64))))))
(fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64))))) (.f64 b b)) (.f64 -2 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64))))))
(fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 a a) (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale))) (.f64 b b)) (/.f64 -2 (/.f64 (.f64 angle (*.f64 (PI.f64) x-scale)) y-scale)))
(+.f64 (.f64 2 (/.f64 (-.f64 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 x-scale (.f64 angle (PI.f64))))) (pow.f64 b 2))) (+.f64 (.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 x-scale (.f64 angle (PI.f64))))) (pow.f64 a 2)) (pow.f64 b 4))) (.f64 -2 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64)))))))
(fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64))))) (.f64 b b)) (fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64))))) (/.f64 (pow.f64 b 4) (.f64 a a))) (.f64 -2 (/.f64 y-scale (.f64 x-scale (*.f64 angle (PI.f64)))))))
(fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 a a) (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale))) (.f64 b b)) (fma.f64 2 (/.f64 (.f64 a a) (/.f64 (pow.f64 b 4) (-.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 a a) (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale))))) (/.f64 -2 (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale))))
(+.f64 (.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 x-scale (.f64 angle (PI.f64))))) (pow.f64 a 4)) (pow.f64 b 6))) (+.f64 (.f64 2 (/.f64 (-.f64 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 x-scale (.f64 angle (PI.f64))))) (pow.f64 b 2))) (+.f64 (.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 x-scale (.f64 angle (PI.f64))))) (pow.f64 a 2)) (pow.f64 b 4))) (.f64 -2 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64))))))))
(fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64))))) (/.f64 (pow.f64 b 6) (pow.f64 a 4))) (fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64))))) (.f64 b b)) (fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64))))) (/.f64 (pow.f64 b 4) (.f64 a a))) (.f64 -2 (/.f64 y-scale (.f64 x-scale (*.f64 angle (PI.f64))))))))
(fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 a a) (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale))) (/.f64 (pow.f64 b 6) (pow.f64 a 4))) (fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 a a) (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale))) (.f64 b b)) (fma.f64 2 (/.f64 (.f64 a a) (/.f64 (pow.f64 b 4) (-.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 a a) (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale))))) (/.f64 -2 (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale)))))
(.f64 -2 (/.f64 y-scale (.f64 x-scale (*.f64 angle (PI.f64)))))
(/.f64 -2 (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale))
(+.f64 (.f64 2 (.f64 (-.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64))))) (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))))) (pow.f64 a 2))) (.f64 -2 (/.f64 y-scale (.f64 x-scale (*.f64 angle (PI.f64))))))
(fma.f64 2 (.f64 (.f64 a a) (-.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (.f64 b b) (PI.f64))))) (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (.f64 b b) (PI.f64))))))) (.f64 -2 (/.f64 y-scale (.f64 x-scale (*.f64 angle (PI.f64))))))
(fma.f64 2 (.f64 (.f64 a a) (-.f64 (/.f64 x-scale (.f64 angle (.f64 (.f64 (.f64 b b) (PI.f64)) y-scale))) (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (.f64 b b) (PI.f64))))))) (/.f64 -2 (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale)))
(+.f64 (.f64 2 (.f64 (-.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64))))) (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))))) (pow.f64 a 2))) (+.f64 (.f64 2 (/.f64 (.f64 (-.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64))))) (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))))) (pow.f64 a 4)) (pow.f64 b 2))) (.f64 -2 (/.f64 y-scale (.f64 x-scale (*.f64 angle (PI.f64)))))))
(fma.f64 2 (.f64 (.f64 a a) (-.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (.f64 b b) (PI.f64))))) (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (.f64 b b) (PI.f64))))))) (fma.f64 2 (/.f64 (-.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (.f64 b b) (PI.f64))))) (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (.f64 b b) (PI.f64)))))) (/.f64 (.f64 b b) (pow.f64 a 4))) (.f64 -2 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64)))))))
(fma.f64 2 (.f64 (.f64 a a) (-.f64 (/.f64 x-scale (.f64 angle (.f64 (.f64 (.f64 b b) (PI.f64)) y-scale))) (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (.f64 b b) (PI.f64))))))) (fma.f64 2 (/.f64 (-.f64 (/.f64 x-scale (.f64 angle (.f64 (.f64 (.f64 b b) (PI.f64)) y-scale))) (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (.f64 b b) (PI.f64)))))) (/.f64 (.f64 b b) (pow.f64 a 4))) (/.f64 -2 (/.f64 (.f64 angle (*.f64 (PI.f64) x-scale)) y-scale))))
(+.f64 (.f64 2 (.f64 (-.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64))))) (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))))) (pow.f64 a 2))) (+.f64 (.f64 2 (/.f64 (.f64 (-.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64))))) (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))))) (pow.f64 a 4)) (pow.f64 b 2))) (+.f64 (.f64 2 (/.f64 (.f64 (-.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64))))) (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))))) (pow.f64 a 6)) (pow.f64 b 4))) (.f64 -2 (/.f64 y-scale (.f64 x-scale (*.f64 angle (PI.f64))))))))
(fma.f64 2 (.f64 (.f64 a a) (-.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (.f64 b b) (PI.f64))))) (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (.f64 b b) (PI.f64))))))) (fma.f64 2 (/.f64 (-.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (.f64 b b) (PI.f64))))) (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (.f64 b b) (PI.f64)))))) (/.f64 (.f64 b b) (pow.f64 a 4))) (fma.f64 2 (/.f64 (-.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (.f64 b b) (PI.f64))))) (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (.f64 b b) (PI.f64)))))) (/.f64 (pow.f64 b 4) (pow.f64 a 6))) (.f64 -2 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64))))))))
(fma.f64 2 (.f64 (.f64 a a) (-.f64 (/.f64 x-scale (.f64 angle (.f64 (.f64 (.f64 b b) (PI.f64)) y-scale))) (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (.f64 b b) (PI.f64))))))) (fma.f64 2 (/.f64 (-.f64 (/.f64 x-scale (.f64 angle (.f64 (.f64 (.f64 b b) (PI.f64)) y-scale))) (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (.f64 b b) (PI.f64)))))) (/.f64 (.f64 b b) (pow.f64 a 4))) (fma.f64 2 (/.f64 (-.f64 (/.f64 x-scale (.f64 angle (.f64 (.f64 (.f64 b b) (PI.f64)) y-scale))) (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (.f64 b b) (PI.f64)))))) (/.f64 (pow.f64 b 4) (pow.f64 a 6))) (/.f64 -2 (/.f64 (.f64 angle (*.f64 (PI.f64) x-scale)) y-scale)))))
(.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -2 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))))
(+.f64 (.f64 2 (/.f64 (-.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (pow.f64 b 2)) (.f64 y-scale (.f64 angle (PI.f64))))) (pow.f64 a 2))) (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))
(fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (PI.f64)))) (/.f64 x-scale (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) (.f64 b b)))) (.f64 a a)) (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))
(fma.f64 2 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale)) (/.f64 x-scale (/.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 b b) y-scale)))) (.f64 a a)) (.f64 -2 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64)))))
(+.f64 (.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (pow.f64 b 2)) (.f64 y-scale (.f64 angle (PI.f64))))) (pow.f64 b 2)) (pow.f64 a 4))) (+.f64 (.f64 2 (/.f64 (-.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (pow.f64 b 2)) (.f64 y-scale (.f64 angle (PI.f64))))) (pow.f64 a 2))) (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))))
(fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (PI.f64)))) (/.f64 x-scale (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) (.f64 b b)))) (/.f64 (pow.f64 a 4) (.f64 b b))) (fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (PI.f64)))) (/.f64 x-scale (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) (.f64 b b)))) (.f64 a a)) (.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))))
(fma.f64 2 (/.f64 (.f64 b b) (/.f64 (pow.f64 a 4) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale)) (/.f64 x-scale (/.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 b b) y-scale)))))) (fma.f64 2 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale)) (/.f64 x-scale (/.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 b b) y-scale)))) (.f64 a a)) (.f64 -2 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))))))
(+.f64 (.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (pow.f64 b 2)) (.f64 y-scale (.f64 angle (PI.f64))))) (pow.f64 b 2)) (pow.f64 a 4))) (+.f64 (.f64 2 (/.f64 (-.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (pow.f64 b 2)) (.f64 y-scale (.f64 angle (PI.f64))))) (pow.f64 a 2))) (+.f64 (.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (pow.f64 b 2)) (.f64 y-scale (.f64 angle (PI.f64))))) (pow.f64 b 4)) (pow.f64 a 6))) (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))))
(fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (PI.f64)))) (/.f64 x-scale (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) (.f64 b b)))) (/.f64 (pow.f64 a 4) (.f64 b b))) (fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (PI.f64)))) (/.f64 x-scale (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) (.f64 b b)))) (.f64 a a)) (fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (PI.f64)))) (/.f64 x-scale (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) (.f64 b b)))) (/.f64 (pow.f64 a 6) (pow.f64 b 4))) (.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64))))))))
(fma.f64 2 (/.f64 (.f64 b b) (/.f64 (pow.f64 a 4) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale)) (/.f64 x-scale (/.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 b b) y-scale)))))) (fma.f64 2 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale)) (/.f64 x-scale (/.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 b b) y-scale)))) (.f64 a a)) (fma.f64 2 (/.f64 (pow.f64 b 4) (/.f64 (pow.f64 a 6) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale)) (/.f64 x-scale (/.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 b b) y-scale)))))) (.f64 -2 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))))))
(.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -2 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))))
(+.f64 (.f64 2 (/.f64 (-.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (pow.f64 b 2)) (.f64 y-scale (.f64 angle (PI.f64))))) (pow.f64 a 2))) (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))
(fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (PI.f64)))) (/.f64 x-scale (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) (.f64 b b)))) (.f64 a a)) (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))
(fma.f64 2 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale)) (/.f64 x-scale (/.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 b b) y-scale)))) (.f64 a a)) (.f64 -2 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64)))))
(+.f64 (.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (pow.f64 b 2)) (.f64 y-scale (.f64 angle (PI.f64))))) (pow.f64 b 2)) (pow.f64 a 4))) (+.f64 (.f64 2 (/.f64 (-.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (pow.f64 b 2)) (.f64 y-scale (.f64 angle (PI.f64))))) (pow.f64 a 2))) (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))))
(fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (PI.f64)))) (/.f64 x-scale (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) (.f64 b b)))) (/.f64 (pow.f64 a 4) (.f64 b b))) (fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (PI.f64)))) (/.f64 x-scale (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) (.f64 b b)))) (.f64 a a)) (.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))))
(fma.f64 2 (/.f64 (.f64 b b) (/.f64 (pow.f64 a 4) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale)) (/.f64 x-scale (/.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 b b) y-scale)))))) (fma.f64 2 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale)) (/.f64 x-scale (/.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 b b) y-scale)))) (.f64 a a)) (.f64 -2 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))))))
(+.f64 (.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (pow.f64 b 2)) (.f64 y-scale (.f64 angle (PI.f64))))) (pow.f64 b 2)) (pow.f64 a 4))) (+.f64 (.f64 2 (/.f64 (-.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (pow.f64 b 2)) (.f64 y-scale (.f64 angle (PI.f64))))) (pow.f64 a 2))) (+.f64 (.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (pow.f64 b 2)) (.f64 y-scale (.f64 angle (PI.f64))))) (pow.f64 b 4)) (pow.f64 a 6))) (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))))
(fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (PI.f64)))) (/.f64 x-scale (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) (.f64 b b)))) (/.f64 (pow.f64 a 4) (.f64 b b))) (fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (PI.f64)))) (/.f64 x-scale (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) (.f64 b b)))) (.f64 a a)) (fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (PI.f64)))) (/.f64 x-scale (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) (.f64 b b)))) (/.f64 (pow.f64 a 6) (pow.f64 b 4))) (.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64))))))))
(fma.f64 2 (/.f64 (.f64 b b) (/.f64 (pow.f64 a 4) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale)) (/.f64 x-scale (/.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 b b) y-scale)))))) (fma.f64 2 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale)) (/.f64 x-scale (/.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 b b) y-scale)))) (.f64 a a)) (fma.f64 2 (/.f64 (pow.f64 b 4) (/.f64 (pow.f64 a 6) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale)) (/.f64 x-scale (/.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 b b) y-scale)))))) (.f64 -2 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))))))
(.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))
(.f64 -2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 -2 (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64))) x-scale))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)))))
(.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))
(.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)))))
(.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))
(.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) (.f64 -2 (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)))))
(.f64 angle (.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (/.f64 1 x-scale) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 1 x-scale)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 angle (/.f64 1 (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (-.f64 (.f64 b b) (*.f64 a a))) (/.f64 x-scale (PI.f64)))))
(/.f64 (/.f64 (.f64 angle 1) (/.f64 x-scale (PI.f64))) (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) 2)))
(.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 angle (/.f64 (/.f64 1 x-scale) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 1 x-scale)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 (/.f64 1 x-scale) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 1 x-scale)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 1)
(.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 1 x-scale)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 1 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 1 x-scale)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (/.f64 1 x-scale) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (/.f64 1 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))
(.f64 (sqrt.f64 (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (.f64 (sqrt.f64 (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 1/2 x-scale)) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (sqrt.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (sqrt.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 1 x-scale)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) 2)) (.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (/.f64 1 x-scale) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(.f64 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) 2)) (/.f64 (.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 1 x-scale)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale) (.f64 (cbrt.f64 (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (cbrt.f64 (pow.f64 (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) 2))))
(.f64 (cbrt.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (cbrt.f64 (pow.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 2)))
(.f64 (cbrt.f64 (.f64 (/.f64 angle (.f64 2 x-scale)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (cbrt.f64 (pow.f64 (.f64 (/.f64 angle (.f64 2 x-scale)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 2)))
(.f64 (cbrt.f64 (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))) (cbrt.f64 (pow.f64 (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) 2)))
(.f64 (cbrt.f64 (pow.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 2)) (cbrt.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(.f64 (cbrt.f64 (.f64 (/.f64 angle (.f64 2 x-scale)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (cbrt.f64 (pow.f64 (.f64 (/.f64 angle (.f64 2 x-scale)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 2)))
(.f64 (cbrt.f64 (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))) (cbrt.f64 (pow.f64 (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) 2)))
(.f64 (.f64 angle (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (/.f64 1 x-scale) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 1 x-scale)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (/.f64 angle (/.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 1 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 1/2 (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
(.f64 1/2 (/.f64 (.f64 angle (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (/.f64 (/.f64 1 x-scale) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 1 x-scale)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (/.f64 angle x-scale) (.f64 1/2 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 1/2 (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
(.f64 1/2 (/.f64 (.f64 angle (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (.f64 1/2 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (/.f64 angle x-scale))
(.f64 1/2 (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
(.f64 1/2 (/.f64 (.f64 angle (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (.f64 angle (neg.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 1 (.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (neg.f64 x-scale))))
(.f64 (.f64 angle (.f64 (PI.f64) (neg.f64 (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (/.f64 1/2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (neg.f64 x-scale)))
(.f64 angle (.f64 (.f64 (neg.f64 (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 1/2 (.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (neg.f64 x-scale)))))
(.f64 (/.f64 1 x-scale) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 1 x-scale)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) 1) (/.f64 angle (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 1 x-scale)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (/.f64 angle 1) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 1 x-scale)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (/.f64 1 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (/.f64 angle (/.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 1/2 (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
(.f64 1/2 (/.f64 (.f64 angle (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale)) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (/.f64 1 (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(.f64 (/.f64 1 (sqrt.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (sqrt.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(.f64 (/.f64 1 (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))) (.f64 angle (/.f64 (PI.f64) (/.f64 (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))) (-.f64 (.f64 b b) (.f64 a a))))))
(.f64 (/.f64 1 (cbrt.f64 (pow.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 2))) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (cbrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(.f64 (/.f64 1 (cbrt.f64 (pow.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) 2))) (/.f64 angle (/.f64 (cbrt.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))
(/.f64 (/.f64 (.f64 1 (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (cbrt.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))) (cbrt.f64 (pow.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) 2)))
(.f64 (/.f64 1 (.f64 x-scale 2)) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))
(.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 1 x-scale)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) x-scale) (/.f64 angle (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 1 x-scale)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (/.f64 angle (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(/.f64 (.f64 angle (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (sqrt.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (sqrt.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(/.f64 (.f64 angle (PI.f64)) (/.f64 (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))))))))
(.f64 (/.f64 angle (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))
(.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 1 x-scale)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (pow.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 1/2) (pow.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 1/2))
(.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 1 x-scale)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (/.f64 angle (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))) x-scale))
(.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 1 x-scale)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (/.f64 angle (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(/.f64 (.f64 angle (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (sqrt.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (sqrt.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(/.f64 (.f64 angle (PI.f64)) (/.f64 (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))))))))
(.f64 (/.f64 angle (cbrt.f64 (pow.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 2))) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (cbrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(.f64 (/.f64 angle (cbrt.f64 (pow.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) 2))) (/.f64 (PI.f64) (/.f64 (cbrt.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (-.f64 (.f64 b b) (*.f64 a a)))))
(.f64 (/.f64 angle (cbrt.f64 (pow.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) 2))) (/.f64 (PI.f64) (/.f64 (cbrt.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))) (-.f64 (.f64 b b) (*.f64 a a)))))
(.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))
(.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 1 x-scale)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (cbrt.f64 (pow.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 2))) (/.f64 angle (cbrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(.f64 (/.f64 angle (cbrt.f64 (pow.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) 2))) (/.f64 (PI.f64) (/.f64 (cbrt.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (-.f64 (.f64 b b) (*.f64 a a)))))
(.f64 (/.f64 angle (cbrt.f64 (pow.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) 2))) (/.f64 (PI.f64) (/.f64 (cbrt.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))) (-.f64 (.f64 b b) (*.f64 a a)))))
(.f64 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-scale 2)) (/.f64 angle (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))
(.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 1 x-scale)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (/.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) x-scale) (/.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(/.f64 (.f64 (/.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) x-scale) (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))
(.f64 (sqrt.f64 (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 (/.f64 (sqrt.f64 (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))) 2) x-scale))
(.f64 (/.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (/.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) x-scale))
(/.f64 (.f64 (/.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) x-scale) (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))
(.f64 (sqrt.f64 (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 (/.f64 (sqrt.f64 (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))) 2) x-scale))
(.f64 (/.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) 1) (/.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(/.f64 (.f64 (/.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) x-scale) (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))
(.f64 (sqrt.f64 (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 (/.f64 (sqrt.f64 (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))) 2) x-scale))
(.f64 (/.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (/.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(.f64 (/.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (sqrt.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (/.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (sqrt.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(.f64 (/.f64 (sqrt.f64 (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))) (/.f64 (sqrt.f64 (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))))))))
(.f64 (/.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (cbrt.f64 (pow.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 2))) (/.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (cbrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(.f64 (/.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (cbrt.f64 (pow.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) 2))) (/.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (cbrt.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(.f64 (/.f64 (sqrt.f64 (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (cbrt.f64 (pow.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) 2))) (/.f64 (sqrt.f64 (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (cbrt.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))))))))
(.f64 (/.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale 2)) (/.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))
(/.f64 (.f64 (/.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) x-scale) (sqrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))
(.f64 (sqrt.f64 (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 (/.f64 (sqrt.f64 (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))) 2) x-scale))
(.f64 (/.f64 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) 2)) x-scale) (/.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (/.f64 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) 2)) x-scale) (/.f64 (/.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) 2) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))
(.f64 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) 2)) (/.f64 (/.f64 (cbrt.f64 (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (.f64 2 x-scale)) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (/.f64 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) 2)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (/.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) x-scale))
(.f64 (/.f64 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) 2)) x-scale) (/.f64 (/.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) 2) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))
(.f64 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) 2)) (/.f64 (/.f64 (cbrt.f64 (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (.f64 2 x-scale)) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (/.f64 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) 2)) 1) (/.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(.f64 (/.f64 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) 2)) x-scale) (/.f64 (/.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) 2) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))
(.f64 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) 2)) (/.f64 (/.f64 (cbrt.f64 (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (.f64 2 x-scale)) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (/.f64 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) 2)) (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (/.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(.f64 (/.f64 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) 2)) (sqrt.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (/.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (sqrt.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(/.f64 (.f64 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) 2)) (/.f64 (cbrt.f64 (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))))) (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))))))
(.f64 (/.f64 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) 2)) (cbrt.f64 (pow.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 2))) (/.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (cbrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(.f64 (/.f64 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) 2)) (cbrt.f64 (pow.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) 2))) (/.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (cbrt.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(.f64 (/.f64 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) 2)) (cbrt.f64 (pow.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) 2))) (/.f64 (cbrt.f64 (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (cbrt.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))))))))
(.f64 (/.f64 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) 2)) (.f64 x-scale 2)) (/.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))
(.f64 (/.f64 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) 2)) x-scale) (/.f64 (/.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) 2) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))
(.f64 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) 2)) (/.f64 (/.f64 (cbrt.f64 (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (.f64 2 x-scale)) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (/.f64 (.f64 angle (PI.f64)) x-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 1 x-scale)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (/.f64 (.f64 angle (PI.f64)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) x-scale))
(.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 1 x-scale)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (/.f64 (.f64 angle (PI.f64)) 1) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 1 x-scale)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (/.f64 (.f64 angle (PI.f64)) (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(/.f64 (.f64 angle (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (sqrt.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (sqrt.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(/.f64 (.f64 angle (PI.f64)) (/.f64 (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))))))))
(.f64 (/.f64 (.f64 angle (PI.f64)) (cbrt.f64 (pow.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 2))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (cbrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(.f64 (/.f64 angle (cbrt.f64 (pow.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) 2))) (/.f64 (PI.f64) (/.f64 (cbrt.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (-.f64 (.f64 b b) (*.f64 a a)))))
(.f64 (/.f64 angle (cbrt.f64 (pow.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) 2))) (/.f64 (PI.f64) (/.f64 (cbrt.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))) (-.f64 (.f64 b b) (*.f64 a a)))))
(.f64 (/.f64 (.f64 angle (PI.f64)) (.f64 x-scale 2)) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))
(.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 1 x-scale)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(pow.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 1)
(.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 1 x-scale)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(neg.f64 (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (neg.f64 x-scale))))
(/.f64 (.f64 angle (.f64 (PI.f64) (neg.f64 (-.f64 (.f64 b b) (.f64 a a))))) (neg.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(/.f64 angle (/.f64 (.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (.f64 2 (neg.f64 x-scale))) (.f64 (neg.f64 (PI.f64)) (-.f64 (.f64 b b) (*.f64 a a)))))
(log.f64 (exp.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 1 x-scale)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(cbrt.f64 (.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (pow.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 2)))
(cbrt.f64 (.f64 (/.f64 angle (.f64 2 x-scale)) (.f64 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (pow.f64 (.f64 (/.f64 angle (.f64 2 x-scale)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 2))))
(cbrt.f64 (.f64 (/.f64 (PI.f64) (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (/.f64 angle (.f64 2 x-scale)) (pow.f64 (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) 2))))
(expm1.f64 (log1p.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 1 x-scale)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(exp.f64 (log.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 1 x-scale)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(log1p.f64 (expm1.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(.f64 (.f64 angle (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 1 x-scale)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 b (.f64 b (/.f64 1 (*.f64 x-scale x-scale))))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(*.f64 b (/.f64 1 (/.f64 x-scale (/.f64 b x-scale))))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(.f64 (.f64 b b) (/.f64 1 (*.f64 x-scale x-scale)))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) 1)
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(.f64 1 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(.f64 (sqrt.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (sqrt.f64 (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(.f64 (sqrt.f64 (.f64 b b)) (.f64 (sqrt.f64 (.f64 b b)) (/.f64 1 (*.f64 x-scale x-scale))))
(.f64 (fabs.f64 b) (/.f64 (.f64 (fabs.f64 b) 1) (*.f64 x-scale x-scale)))
(.f64 (/.f64 1 (.f64 x-scale x-scale)) (*.f64 (fabs.f64 b) (fabs.f64 b)))
(.f64 (cbrt.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (cbrt.f64 (/.f64 (pow.f64 b 4) (pow.f64 x-scale 4))))
(.f64 (cbrt.f64 (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (cbrt.f64 (/.f64 (pow.f64 b 4) (pow.f64 x-scale 4))))
(.f64 (cbrt.f64 (/.f64 (pow.f64 b 4) (pow.f64 x-scale 4))) (cbrt.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))
(.f64 (cbrt.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (cbrt.f64 (/.f64 (pow.f64 b 4) (pow.f64 x-scale 4))))
(.f64 (cbrt.f64 (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (cbrt.f64 (/.f64 (pow.f64 b 4) (pow.f64 x-scale 4))))
(.f64 (cbrt.f64 (pow.f64 b 4)) (.f64 (cbrt.f64 (.f64 b b)) (/.f64 1 (.f64 x-scale x-scale))))
(.f64 (cbrt.f64 (pow.f64 b 4)) (/.f64 (.f64 (cbrt.f64 (.f64 b b)) 1) (.f64 x-scale x-scale)))
(.f64 (/.f64 1 (.f64 x-scale x-scale)) (.f64 (cbrt.f64 (.f64 b b)) (cbrt.f64 (pow.f64 b 4))))
(.f64 (/.f64 (.f64 b b) x-scale) (/.f64 1 x-scale))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(.f64 (/.f64 1 (.f64 x-scale x-scale)) (*.f64 b b))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(*.f64 (/.f64 b x-scale) (/.f64 b x-scale))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(.f64 (.f64 b (neg.f64 b)) (/.f64 1 (*.f64 x-scale (neg.f64 x-scale))))
(.f64 b (.f64 (neg.f64 b) (/.f64 1 (*.f64 x-scale (neg.f64 x-scale)))))
(.f64 (/.f64 1 x-scale) (/.f64 (.f64 b b) x-scale))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(.f64 (/.f64 1 (sqrt.f64 (.f64 x-scale x-scale))) (/.f64 (.f64 b b) (sqrt.f64 (.f64 x-scale x-scale))))
(.f64 (/.f64 1 (fabs.f64 x-scale)) (/.f64 (.f64 b b) (fabs.f64 x-scale)))
(.f64 (/.f64 1 (fabs.f64 x-scale)) (.f64 b (/.f64 b (fabs.f64 x-scale))))
(.f64 (/.f64 1 (cbrt.f64 (pow.f64 x-scale 4))) (/.f64 (.f64 b b) (cbrt.f64 (*.f64 x-scale x-scale))))
(/.f64 (.f64 1 (/.f64 b (/.f64 (cbrt.f64 (.f64 x-scale x-scale)) b))) (cbrt.f64 (pow.f64 x-scale 4)))
(.f64 (/.f64 b 1) (/.f64 b (.f64 x-scale x-scale)))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(.f64 (/.f64 b (.f64 x-scale x-scale)) b)
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(.f64 (/.f64 b (sqrt.f64 (.f64 x-scale x-scale))) (/.f64 b (sqrt.f64 (*.f64 x-scale x-scale))))
(*.f64 (/.f64 b (fabs.f64 x-scale)) (/.f64 b (fabs.f64 x-scale)))
(.f64 (pow.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) 1/2) (pow.f64 (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)) 1/2))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(.f64 (/.f64 (sqrt.f64 (.f64 b b)) 1) (/.f64 (sqrt.f64 (.f64 b b)) (.f64 x-scale x-scale)))
(.f64 (fabs.f64 b) (/.f64 (fabs.f64 b) (.f64 x-scale x-scale)))
(*.f64 (/.f64 (fabs.f64 b) x-scale) (/.f64 (fabs.f64 b) x-scale))
(.f64 (/.f64 (sqrt.f64 (.f64 b b)) x-scale) (/.f64 (sqrt.f64 (*.f64 b b)) x-scale))
(.f64 (fabs.f64 b) (/.f64 (fabs.f64 b) (.f64 x-scale x-scale)))
(*.f64 (/.f64 (fabs.f64 b) x-scale) (/.f64 (fabs.f64 b) x-scale))
(.f64 (/.f64 (cbrt.f64 (pow.f64 b 4)) 1) (/.f64 (cbrt.f64 (.f64 b b)) (*.f64 x-scale x-scale)))
(.f64 (cbrt.f64 (pow.f64 b 4)) (/.f64 (cbrt.f64 (.f64 b b)) (*.f64 x-scale x-scale)))
(.f64 (/.f64 b (cbrt.f64 (pow.f64 x-scale 4))) (/.f64 b (cbrt.f64 (.f64 x-scale x-scale))))
(/.f64 (.f64 b (/.f64 b (cbrt.f64 (.f64 x-scale x-scale)))) (cbrt.f64 (pow.f64 x-scale 4)))
(/.f64 (/.f64 b (/.f64 (cbrt.f64 (*.f64 x-scale x-scale)) b)) (cbrt.f64 (pow.f64 x-scale 4)))
(.f64 (/.f64 (sqrt.f64 (.f64 b b)) (sqrt.f64 (.f64 x-scale x-scale))) (/.f64 (sqrt.f64 (.f64 b b)) (sqrt.f64 (*.f64 x-scale x-scale))))
(*.f64 (/.f64 (fabs.f64 b) (fabs.f64 x-scale)) (/.f64 (fabs.f64 b) (fabs.f64 x-scale)))
(.f64 (/.f64 (sqrt.f64 (.f64 b b)) (cbrt.f64 (pow.f64 x-scale 4))) (/.f64 (sqrt.f64 (.f64 b b)) (cbrt.f64 (.f64 x-scale x-scale))))
(/.f64 (.f64 (fabs.f64 b) (/.f64 (fabs.f64 b) (cbrt.f64 (.f64 x-scale x-scale)))) (cbrt.f64 (pow.f64 x-scale 4)))
(/.f64 (fabs.f64 b) (/.f64 (cbrt.f64 (pow.f64 x-scale 4)) (/.f64 (fabs.f64 b) (cbrt.f64 (*.f64 x-scale x-scale)))))
(.f64 (/.f64 (cbrt.f64 (pow.f64 b 4)) x-scale) (/.f64 (cbrt.f64 (.f64 b b)) x-scale))
(.f64 (cbrt.f64 (pow.f64 b 4)) (/.f64 (cbrt.f64 (.f64 b b)) (*.f64 x-scale x-scale)))
(.f64 (/.f64 (cbrt.f64 (pow.f64 b 4)) (sqrt.f64 (.f64 x-scale x-scale))) (/.f64 (cbrt.f64 (.f64 b b)) (sqrt.f64 (.f64 x-scale x-scale))))
(.f64 (/.f64 (cbrt.f64 (pow.f64 b 4)) (fabs.f64 x-scale)) (/.f64 (cbrt.f64 (.f64 b b)) (fabs.f64 x-scale)))
(.f64 (/.f64 (cbrt.f64 (pow.f64 b 4)) (cbrt.f64 (pow.f64 x-scale 4))) (/.f64 (cbrt.f64 (.f64 b b)) (cbrt.f64 (*.f64 x-scale x-scale))))
(pow.f64 (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)) 1)
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(neg.f64 (/.f64 (.f64 b b) (.f64 x-scale (neg.f64 x-scale))))
(/.f64 (/.f64 (*.f64 b (neg.f64 b)) x-scale) (neg.f64 x-scale))
(log.f64 (exp.f64 (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(cbrt.f64 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (/.f64 (pow.f64 b 4) (pow.f64 x-scale 4))))
(cbrt.f64 (.f64 (/.f64 b x-scale) (.f64 (/.f64 b x-scale) (/.f64 (pow.f64 b 4) (pow.f64 x-scale 4)))))
(cbrt.f64 (/.f64 (/.f64 (*.f64 (/.f64 b (/.f64 x-scale b)) (pow.f64 b 4)) x-scale) (pow.f64 x-scale 4)))
(expm1.f64 (log1p.f64 (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(exp.f64 (log.f64 (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(log1p.f64 (expm1.f64 (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(.f64 b (/.f64 b (.f64 x-scale x-scale)))
(.f64 a (.f64 a (/.f64 1 (*.f64 y-scale y-scale))))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(*.f64 a (/.f64 1 (/.f64 y-scale (/.f64 a y-scale))))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(.f64 (.f64 a a) (/.f64 1 (*.f64 y-scale y-scale)))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) 1)
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(.f64 1 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(.f64 (sqrt.f64 (.f64 a a)) (.f64 (sqrt.f64 (.f64 a a)) (/.f64 1 (*.f64 y-scale y-scale))))
(.f64 (fabs.f64 a) (.f64 (/.f64 (/.f64 1 y-scale) y-scale) (fabs.f64 a)))
(.f64 (fabs.f64 a) (/.f64 (fabs.f64 a) (.f64 y-scale y-scale)))
(.f64 (sqrt.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale))) (sqrt.f64 (*.f64 (/.f64 a y-scale) (/.f64 a y-scale))))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(.f64 (cbrt.f64 (pow.f64 a 4)) (.f64 (cbrt.f64 (.f64 a a)) (/.f64 1 (.f64 y-scale y-scale))))
(.f64 (cbrt.f64 (pow.f64 a 4)) (.f64 (/.f64 (/.f64 1 y-scale) y-scale) (cbrt.f64 (*.f64 a a))))
(.f64 (cbrt.f64 (pow.f64 a 4)) (/.f64 (cbrt.f64 (.f64 a a)) (*.f64 y-scale y-scale)))
(.f64 (cbrt.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale))) (cbrt.f64 (/.f64 (pow.f64 a 4) (pow.f64 y-scale 4))))
(*.f64 (cbrt.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)) (cbrt.f64 (/.f64 (pow.f64 a 4) (pow.f64 y-scale 4))))
(.f64 (cbrt.f64 (/.f64 (pow.f64 a 4) (pow.f64 y-scale 4))) (cbrt.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale))))
(.f64 (cbrt.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale))) (cbrt.f64 (/.f64 (pow.f64 a 4) (pow.f64 y-scale 4))))
(*.f64 (cbrt.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)) (cbrt.f64 (/.f64 (pow.f64 a 4) (pow.f64 y-scale 4))))
(.f64 (/.f64 (.f64 a a) y-scale) (/.f64 1 y-scale))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(.f64 (.f64 a (neg.f64 a)) (/.f64 1 (*.f64 y-scale (neg.f64 y-scale))))
(/.f64 a (/.f64 (*.f64 y-scale (neg.f64 y-scale)) (neg.f64 a)))
(.f64 (/.f64 1 (.f64 y-scale y-scale)) (*.f64 a a))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(*.f64 (/.f64 a y-scale) (/.f64 a y-scale))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(.f64 (/.f64 a 1) (/.f64 a (.f64 y-scale y-scale)))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(.f64 (/.f64 1 y-scale) (/.f64 (.f64 a a) y-scale))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(.f64 (/.f64 1 (sqrt.f64 (.f64 y-scale y-scale))) (/.f64 (.f64 a a) (sqrt.f64 (.f64 y-scale y-scale))))
(*.f64 (/.f64 1 (fabs.f64 y-scale)) (/.f64 a (/.f64 (fabs.f64 y-scale) a)))
(.f64 (/.f64 1 (fabs.f64 y-scale)) (.f64 a (/.f64 a (fabs.f64 y-scale))))
(.f64 (/.f64 1 (cbrt.f64 (pow.f64 y-scale 4))) (/.f64 (.f64 a a) (cbrt.f64 (*.f64 y-scale y-scale))))
(/.f64 1 (/.f64 (cbrt.f64 (pow.f64 y-scale 4)) (/.f64 (.f64 a a) (cbrt.f64 (.f64 y-scale y-scale)))))
(.f64 (/.f64 a (.f64 y-scale y-scale)) a)
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(.f64 (/.f64 a (sqrt.f64 (.f64 y-scale y-scale))) (/.f64 a (sqrt.f64 (*.f64 y-scale y-scale))))
(*.f64 (/.f64 a (fabs.f64 y-scale)) (/.f64 a (fabs.f64 y-scale)))
(.f64 (pow.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) 1/2) (pow.f64 (*.f64 (/.f64 a y-scale) (/.f64 a y-scale)) 1/2))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(.f64 (/.f64 (sqrt.f64 (.f64 a a)) 1) (/.f64 (sqrt.f64 (.f64 a a)) (.f64 y-scale y-scale)))
(.f64 (fabs.f64 a) (.f64 (/.f64 (/.f64 1 y-scale) y-scale) (fabs.f64 a)))
(.f64 (fabs.f64 a) (/.f64 (fabs.f64 a) (.f64 y-scale y-scale)))
(.f64 (/.f64 (sqrt.f64 (.f64 a a)) y-scale) (/.f64 (sqrt.f64 (*.f64 a a)) y-scale))
(.f64 (fabs.f64 a) (.f64 (/.f64 (/.f64 1 y-scale) y-scale) (fabs.f64 a)))
(.f64 (fabs.f64 a) (/.f64 (fabs.f64 a) (.f64 y-scale y-scale)))
(.f64 (/.f64 (cbrt.f64 (pow.f64 a 4)) 1) (/.f64 (cbrt.f64 (.f64 a a)) (*.f64 y-scale y-scale)))
(.f64 (cbrt.f64 (pow.f64 a 4)) (.f64 (/.f64 (/.f64 1 y-scale) y-scale) (cbrt.f64 (*.f64 a a))))
(.f64 (cbrt.f64 (pow.f64 a 4)) (/.f64 (cbrt.f64 (.f64 a a)) (*.f64 y-scale y-scale)))
(.f64 (/.f64 a (cbrt.f64 (pow.f64 y-scale 4))) (/.f64 a (cbrt.f64 (.f64 y-scale y-scale))))
(/.f64 (/.f64 (.f64 a a) (cbrt.f64 (.f64 y-scale y-scale))) (cbrt.f64 (pow.f64 y-scale 4)))
(.f64 (/.f64 (sqrt.f64 (.f64 a a)) (sqrt.f64 (.f64 y-scale y-scale))) (/.f64 (sqrt.f64 (.f64 a a)) (sqrt.f64 (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (fabs.f64 a) (fabs.f64 y-scale)) (/.f64 (fabs.f64 a) (fabs.f64 y-scale)))
(.f64 (/.f64 (sqrt.f64 (.f64 a a)) (cbrt.f64 (pow.f64 y-scale 4))) (/.f64 (sqrt.f64 (.f64 a a)) (cbrt.f64 (.f64 y-scale y-scale))))
(.f64 (/.f64 (fabs.f64 a) (cbrt.f64 (pow.f64 y-scale 4))) (/.f64 (fabs.f64 a) (cbrt.f64 (.f64 y-scale y-scale))))
(.f64 (/.f64 (cbrt.f64 (pow.f64 a 4)) y-scale) (/.f64 (cbrt.f64 (.f64 a a)) y-scale))
(.f64 (cbrt.f64 (pow.f64 a 4)) (.f64 (/.f64 (/.f64 1 y-scale) y-scale) (cbrt.f64 (*.f64 a a))))
(.f64 (cbrt.f64 (pow.f64 a 4)) (/.f64 (cbrt.f64 (.f64 a a)) (*.f64 y-scale y-scale)))
(.f64 (/.f64 (cbrt.f64 (pow.f64 a 4)) (sqrt.f64 (.f64 y-scale y-scale))) (/.f64 (cbrt.f64 (.f64 a a)) (sqrt.f64 (.f64 y-scale y-scale))))
(.f64 (/.f64 (cbrt.f64 (pow.f64 a 4)) (fabs.f64 y-scale)) (/.f64 (cbrt.f64 (.f64 a a)) (fabs.f64 y-scale)))
(/.f64 (cbrt.f64 (pow.f64 a 4)) (/.f64 (fabs.f64 y-scale) (/.f64 (cbrt.f64 (*.f64 a a)) (fabs.f64 y-scale))))
(.f64 (/.f64 (cbrt.f64 (pow.f64 a 4)) (cbrt.f64 (pow.f64 y-scale 4))) (/.f64 (cbrt.f64 (.f64 a a)) (cbrt.f64 (*.f64 y-scale y-scale))))
(/.f64 (.f64 (cbrt.f64 (pow.f64 a 4)) (/.f64 (cbrt.f64 (.f64 a a)) (cbrt.f64 (*.f64 y-scale y-scale)))) (cbrt.f64 (pow.f64 y-scale 4)))
(pow.f64 (*.f64 (/.f64 a y-scale) (/.f64 a y-scale)) 1)
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(neg.f64 (/.f64 (.f64 a a) (.f64 y-scale (neg.f64 y-scale))))
(.f64 (.f64 a (neg.f64 a)) (/.f64 1 (*.f64 y-scale (neg.f64 y-scale))))
(/.f64 a (/.f64 (*.f64 y-scale (neg.f64 y-scale)) (neg.f64 a)))
(log.f64 (exp.f64 (*.f64 (/.f64 a y-scale) (/.f64 a y-scale))))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(cbrt.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (/.f64 (pow.f64 a 4) (pow.f64 y-scale 4))))
(cbrt.f64 (*.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (/.f64 (pow.f64 a 4) (pow.f64 y-scale 4))))
(expm1.f64 (log1p.f64 (*.f64 (/.f64 a y-scale) (/.f64 a y-scale))))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(exp.f64 (log.f64 (*.f64 (/.f64 a y-scale) (/.f64 a y-scale))))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(log1p.f64 (expm1.f64 (*.f64 (/.f64 a y-scale) (/.f64 a y-scale))))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(/.f64 (/.f64 a (/.f64 y-scale a)) y-scale)
(.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle)))
(.f64 y-scale (/.f64 (.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (/.f64 x-scale angle)) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 y-scale (.f64 (/.f64 2 (PI.f64)) (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (*.f64 a a))) (/.f64 x-scale angle))))
(.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 2 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 y-scale (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale))))
(.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))) (/.f64 x-scale angle))) 1)
(.f64 y-scale (/.f64 (.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (/.f64 x-scale angle)) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 y-scale (.f64 (/.f64 2 (PI.f64)) (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (*.f64 a a))) (/.f64 x-scale angle))))
(.f64 1 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))) (/.f64 x-scale angle))))
(.f64 y-scale (/.f64 (.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (/.f64 x-scale angle)) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 y-scale (.f64 (/.f64 2 (PI.f64)) (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (*.f64 a a))) (/.f64 x-scale angle))))
(.f64 (sqrt.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle)))) (sqrt.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))) (/.f64 x-scale angle)))))
(.f64 y-scale (/.f64 (.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (/.f64 x-scale angle)) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 y-scale (.f64 (/.f64 2 (PI.f64)) (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (*.f64 a a))) (/.f64 x-scale angle))))
(.f64 (sqrt.f64 y-scale) (.f64 (sqrt.f64 y-scale) (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))) (/.f64 x-scale angle))))
(.f64 (.f64 (sqrt.f64 y-scale) (sqrt.f64 y-scale)) (/.f64 (.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (/.f64 x-scale angle)) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))
(.f64 (.f64 (/.f64 2 (PI.f64)) (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 x-scale angle))) (.f64 (sqrt.f64 y-scale) (sqrt.f64 y-scale)))
(.f64 (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle)))) (cbrt.f64 (pow.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))) (/.f64 x-scale angle))) 2)))
(.f64 (cbrt.f64 (.f64 y-scale (/.f64 (.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (/.f64 x-scale angle)) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (cbrt.f64 (pow.f64 (.f64 y-scale (/.f64 (.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (/.f64 x-scale angle)) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))) 2)))
(.f64 (cbrt.f64 (.f64 y-scale (.f64 (/.f64 2 (PI.f64)) (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 x-scale angle))))) (cbrt.f64 (pow.f64 (.f64 y-scale (.f64 (/.f64 2 (PI.f64)) (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (*.f64 a a))) (/.f64 x-scale angle)))) 2)))
(.f64 (cbrt.f64 (pow.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle))) 2)) (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))) (/.f64 x-scale angle)))))
(.f64 (cbrt.f64 (.f64 y-scale (/.f64 (.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (/.f64 x-scale angle)) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (cbrt.f64 (pow.f64 (.f64 y-scale (/.f64 (.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (/.f64 x-scale angle)) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))) 2)))
(.f64 (cbrt.f64 (.f64 y-scale (.f64 (/.f64 2 (PI.f64)) (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 x-scale angle))))) (cbrt.f64 (pow.f64 (.f64 y-scale (.f64 (/.f64 2 (PI.f64)) (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (*.f64 a a))) (/.f64 x-scale angle)))) 2)))
(.f64 (cbrt.f64 (.f64 y-scale y-scale)) (.f64 (cbrt.f64 y-scale) (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle))))
(.f64 (cbrt.f64 (.f64 y-scale y-scale)) (.f64 (/.f64 (.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (/.f64 x-scale angle)) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (cbrt.f64 y-scale)))
(.f64 (cbrt.f64 (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 2 (PI.f64)) (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (.f64 a a)))) (*.f64 (/.f64 x-scale angle) (cbrt.f64 y-scale))))
(.f64 (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 2 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 y-scale (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale))))
(.f64 (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle)) y-scale)
(.f64 y-scale (/.f64 (.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (/.f64 x-scale angle)) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 y-scale (.f64 (/.f64 2 (PI.f64)) (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (*.f64 a a))) (/.f64 x-scale angle))))
(.f64 (neg.f64 y-scale) (/.f64 1 (.f64 (neg.f64 (/.f64 angle x-scale)) (.f64 1/2 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(.f64 (neg.f64 y-scale) (/.f64 1 (.f64 (.f64 1/2 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (/.f64 (neg.f64 angle) x-scale))))
(.f64 (neg.f64 y-scale) (/.f64 (/.f64 -1 (/.f64 angle x-scale)) (.f64 1/2 (/.f64 (PI.f64) (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (.f64 a a)))))))
(.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) x-scale) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))
(.f64 2 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 y-scale (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale))))
(.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) x-scale)
(.f64 2 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 y-scale (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale))))
(.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) 1) (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 2 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 y-scale (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale))))
(.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(.f64 (sqrt.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (.f64 (sqrt.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))
(/.f64 (.f64 (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))) (.f64 y-scale (sqrt.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))))) (.f64 angle (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64)))))
(.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (cbrt.f64 (pow.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 2))) (cbrt.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(.f64 (cbrt.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (.f64 (cbrt.f64 (pow.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) 2)) (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))
(.f64 (cbrt.f64 (pow.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) 2)) (.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (cbrt.f64 (.f64 x-scale (.f64 2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))))))))
(.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale 2)) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))
(.f64 2 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 y-scale (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale))))
(.f64 (/.f64 y-scale angle) (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (-.f64 (.f64 b b) (*.f64 a a))) (/.f64 x-scale (PI.f64))))
(.f64 2 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 y-scale (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale))))
(.f64 (/.f64 y-scale 1) (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle)))
(.f64 y-scale (/.f64 (.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (/.f64 x-scale angle)) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 y-scale (.f64 (/.f64 2 (PI.f64)) (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (*.f64 a a))) (/.f64 x-scale angle))))
(.f64 (/.f64 1 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 y-scale (/.f64 (/.f64 1 x-scale) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(.f64 (/.f64 1 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (/.f64 y-scale (/.f64 1 x-scale)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))) x-scale))
(.f64 (/.f64 1 (sqrt.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (/.f64 y-scale (sqrt.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(.f64 (/.f64 1 (sqrt.f64 (.f64 (/.f64 angle (.f64 2 x-scale)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (/.f64 y-scale (sqrt.f64 (.f64 (/.f64 angle (.f64 2 x-scale)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(.f64 (/.f64 1 (sqrt.f64 (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))) (/.f64 y-scale (sqrt.f64 (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))))))))
(.f64 (/.f64 1 (cbrt.f64 (pow.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 2))) (/.f64 y-scale (cbrt.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(.f64 (/.f64 1 (cbrt.f64 (pow.f64 (.f64 (/.f64 angle (.f64 2 x-scale)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 2))) (/.f64 y-scale (cbrt.f64 (.f64 (/.f64 angle (.f64 2 x-scale)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(.f64 (/.f64 1 (cbrt.f64 (pow.f64 (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) 2))) (/.f64 y-scale (cbrt.f64 (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))))))))
(.f64 (/.f64 1 (/.f64 angle x-scale)) (/.f64 y-scale (.f64 1/2 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(.f64 (.f64 (/.f64 1 angle) x-scale) (/.f64 (/.f64 y-scale 1/2) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 (/.f64 1 angle) x-scale) (/.f64 (/.f64 y-scale 1/2) (/.f64 (PI.f64) (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (.f64 a a))))))
(.f64 (/.f64 y-scale (/.f64 angle (/.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))
(.f64 2 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 y-scale (/.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) x-scale))))
(.f64 (/.f64 y-scale (.f64 angle (neg.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (neg.f64 x-scale)))
(.f64 (neg.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (/.f64 (/.f64 y-scale angle) (.f64 (PI.f64) (neg.f64 (-.f64 (.f64 b b) (.f64 a a))))))
(.f64 (.f64 2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) (.f64 (neg.f64 x-scale) (/.f64 y-scale (.f64 angle (.f64 (neg.f64 (PI.f64)) (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 (pow.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle))) 1/2) (pow.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))) (/.f64 x-scale angle))) 1/2))
(.f64 y-scale (/.f64 (.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (/.f64 x-scale angle)) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 y-scale (.f64 (/.f64 2 (PI.f64)) (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (*.f64 a a))) (/.f64 x-scale angle))))
(.f64 (/.f64 (sqrt.f64 y-scale) 1) (/.f64 (sqrt.f64 y-scale) (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(/.f64 (.f64 (sqrt.f64 y-scale) (sqrt.f64 y-scale)) (.f64 (/.f64 angle (.f64 2 x-scale)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(/.f64 (.f64 (sqrt.f64 y-scale) (sqrt.f64 y-scale)) (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))))))
(.f64 (/.f64 (sqrt.f64 y-scale) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (sqrt.f64 y-scale) (/.f64 (/.f64 1 x-scale) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(.f64 (/.f64 (sqrt.f64 y-scale) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (/.f64 (sqrt.f64 y-scale) (/.f64 1 x-scale)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (/.f64 (sqrt.f64 y-scale) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (sqrt.f64 y-scale) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)))
(.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) 1) (/.f64 (cbrt.f64 y-scale) (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(.f64 (cbrt.f64 (.f64 y-scale y-scale)) (/.f64 (cbrt.f64 y-scale) (.f64 (/.f64 angle (.f64 2 x-scale)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(/.f64 (.f64 (cbrt.f64 (.f64 y-scale y-scale)) (/.f64 (cbrt.f64 y-scale) (/.f64 angle (.f64 2 x-scale)))) (/.f64 (PI.f64) (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (*.f64 a a)))))
(.f64 (/.f64 (sqrt.f64 y-scale) (sqrt.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (/.f64 (sqrt.f64 y-scale) (sqrt.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(/.f64 (.f64 (sqrt.f64 y-scale) (sqrt.f64 y-scale)) (.f64 (/.f64 angle (.f64 2 x-scale)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(/.f64 (.f64 (sqrt.f64 y-scale) (sqrt.f64 y-scale)) (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))))))
(.f64 (/.f64 (sqrt.f64 y-scale) (cbrt.f64 (pow.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 2))) (/.f64 (sqrt.f64 y-scale) (cbrt.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(/.f64 (.f64 (sqrt.f64 y-scale) (/.f64 (sqrt.f64 y-scale) (cbrt.f64 (.f64 (/.f64 angle (.f64 2 x-scale)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))) (cbrt.f64 (pow.f64 (.f64 (/.f64 angle (.f64 2 x-scale)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 2)))
(/.f64 (.f64 (sqrt.f64 y-scale) (/.f64 (sqrt.f64 y-scale) (cbrt.f64 (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))))) (cbrt.f64 (pow.f64 (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) 2)))
(.f64 (/.f64 (sqrt.f64 y-scale) (/.f64 angle x-scale)) (/.f64 (sqrt.f64 y-scale) (.f64 1/2 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(.f64 (.f64 (/.f64 (sqrt.f64 y-scale) angle) x-scale) (/.f64 (sqrt.f64 y-scale) (.f64 1/2 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(.f64 (/.f64 (sqrt.f64 y-scale) (/.f64 angle x-scale)) (/.f64 (sqrt.f64 y-scale) (.f64 1/2 (/.f64 (PI.f64) (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (.f64 a a)))))))
(.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (cbrt.f64 y-scale) (/.f64 (/.f64 1 x-scale) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (/.f64 (cbrt.f64 y-scale) (/.f64 1 x-scale)) (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (cbrt.f64 y-scale) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))) x-scale)))
(.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (sqrt.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) (/.f64 (cbrt.f64 y-scale) (sqrt.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(.f64 (cbrt.f64 (.f64 y-scale y-scale)) (/.f64 (cbrt.f64 y-scale) (.f64 (/.f64 angle (.f64 2 x-scale)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(/.f64 (.f64 (cbrt.f64 (.f64 y-scale y-scale)) (/.f64 (cbrt.f64 y-scale) (/.f64 angle (.f64 2 x-scale)))) (/.f64 (PI.f64) (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (*.f64 a a)))))
(.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (cbrt.f64 (pow.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 2))) (/.f64 (cbrt.f64 y-scale) (cbrt.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (cbrt.f64 (pow.f64 (.f64 (/.f64 angle (.f64 2 x-scale)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 2))) (/.f64 (cbrt.f64 y-scale) (cbrt.f64 (.f64 (/.f64 angle (.f64 2 x-scale)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (/.f64 (cbrt.f64 (pow.f64 (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) 2)) (/.f64 (cbrt.f64 y-scale) (cbrt.f64 (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (/.f64 (.f64 (/.f64 1/2 x-scale) angle) (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))))))))
(.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (/.f64 angle x-scale)) (/.f64 (cbrt.f64 y-scale) (.f64 1/2 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(.f64 (.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) angle) x-scale) (/.f64 (cbrt.f64 y-scale) (.f64 1/2 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(.f64 (.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) angle) x-scale) (/.f64 (cbrt.f64 y-scale) (.f64 1/2 (/.f64 (PI.f64) (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (.f64 a a)))))))
(pow.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle))) 1)
(.f64 y-scale (/.f64 (.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (/.f64 x-scale angle)) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 y-scale (.f64 (/.f64 2 (PI.f64)) (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (*.f64 a a))) (/.f64 x-scale angle))))
(neg.f64 (/.f64 y-scale (.f64 (neg.f64 (/.f64 angle x-scale)) (.f64 1/2 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(neg.f64 (/.f64 (/.f64 y-scale (/.f64 (neg.f64 angle) x-scale)) (.f64 1/2 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))
(/.f64 (neg.f64 y-scale) (.f64 (/.f64 (PI.f64) (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 1/2 (neg.f64 (/.f64 angle x-scale)))))
(log.f64 (exp.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle)))))
(.f64 y-scale (/.f64 (.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (/.f64 x-scale angle)) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 y-scale (.f64 (/.f64 2 (PI.f64)) (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (*.f64 a a))) (/.f64 x-scale angle))))
(cbrt.f64 (.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle))) (pow.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))) (/.f64 x-scale angle))) 2)))
(cbrt.f64 (.f64 (.f64 y-scale (/.f64 (.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (/.f64 x-scale angle)) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (pow.f64 (.f64 y-scale (/.f64 (.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (/.f64 x-scale angle)) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))) 2)))
(cbrt.f64 (.f64 y-scale (.f64 (.f64 (/.f64 2 (PI.f64)) (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 x-scale angle))) (pow.f64 (.f64 y-scale (.f64 (/.f64 2 (PI.f64)) (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (*.f64 a a))) (/.f64 x-scale angle)))) 2))))
(expm1.f64 (log1p.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle)))))
(.f64 y-scale (/.f64 (.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (/.f64 x-scale angle)) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 y-scale (.f64 (/.f64 2 (PI.f64)) (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (*.f64 a a))) (/.f64 x-scale angle))))
(exp.f64 (log.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle)))))
(.f64 y-scale (/.f64 (.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (/.f64 x-scale angle)) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 y-scale (.f64 (/.f64 2 (PI.f64)) (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (*.f64 a a))) (/.f64 x-scale angle))))
(log1p.f64 (expm1.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle)))))
(.f64 y-scale (/.f64 (.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (/.f64 x-scale angle)) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 y-scale (.f64 (/.f64 2 (PI.f64)) (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (*.f64 a a))) (/.f64 x-scale angle))))

localize175.0ms (0.1%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	63.6%	(/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))
✓	61.8%	(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
✓	61.7%	(cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))
✓	59.3%	(/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))

Compiler

Compiled 540 to 280 computations (48.1% saved)

series44.0ms (0%)

Counts

4 → 120

Calls

30 calls:

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

rewrite99.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

786×	`add-sqr-sqrt`
772×	`*-un-lft-identity`
768×	`pow1`
728×	`add-exp-log`
728×	`add-log-exp`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	33	412
1	761	412

Stop Event

1×	node limit

Counts

4 → 66

Calls

Call 1

Inputs
(/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2))))))
(cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))

Outputs
(((.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 1 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 (sqrt.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))) (sqrt.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 (sqrt.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (sqrt.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 (cbrt.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))) (.f64 (cbrt.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))) (cbrt.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 (.f64 (cbrt.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))) (cbrt.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))))) (cbrt.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 (.f64 (cbrt.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (cbrt.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (cbrt.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 (/.f64 1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((log.f64 (exp.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((cbrt.f64 (.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))) (.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))) (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((expm1.f64 (log1p.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((exp.f64 (log.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((log1p.f64 (expm1.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)))
(((.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 1 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 (sqrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (sqrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 (.f64 (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((log.f64 (exp.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((cbrt.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((expm1.f64 (log1p.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((exp.f64 (log.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((log1p.f64 (expm1.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) #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>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #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>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #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>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 (.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #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>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #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>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((cbrt.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #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>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #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>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #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>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) #f)))
(((.f64 x-scale (.f64 -1/2 (/.f64 1 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 -1/2 (.f64 x-scale (/.f64 1 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 (.f64 x-scale -1/2) (/.f64 1 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.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>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 1 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 (sqrt.f64 (.f64 x-scale -1/2)) (.f64 (sqrt.f64 (.f64 x-scale -1/2)) (/.f64 1 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 (sqrt.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (sqrt.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 (.f64 (cbrt.f64 (.f64 x-scale -1/2)) (cbrt.f64 (.f64 x-scale -1/2))) (.f64 (cbrt.f64 (.f64 x-scale -1/2)) (/.f64 1 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 (cbrt.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 (cbrt.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (cbrt.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 (.f64 (cbrt.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (cbrt.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))) (cbrt.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 (/.f64 1 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))) (.f64 x-scale -1/2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 (.f64 (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 (.f64 (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) 2) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 (.f64 (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) 1) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 (.f64 (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))) (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((.f64 (.f64 (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (cbrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))) (cbrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))))) (cbrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.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 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((pow.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.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>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((log.f64 (exp.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((cbrt.f64 (.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((expm1.f64 (log1p.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((exp.f64 (log.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) #f)) ((log1p.f64 (expm1.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))))))) #f)))

simplify264.0ms (0.2%)

Algorithm

1×	egg-herbie

Rules

1410×	`associate-l`
1174×	`*-commutative`
1092×	`associate-/l*`
1060×	`associate-/r*`
614×	`associate-*r/`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	645	39066
1	2194	38616

Stop Event

1×	node limit

Counts

186 → 235

Calls

Call 1

Inputs
(.f64 1/360 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (pow.f64 b 2)))
(+.f64 (.f64 1/360 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (pow.f64 b 2))) (.f64 1/2 (.f64 (-.f64 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 x-scale 2)) (pow.f64 b 2)) (.f64 1/180 (/.f64 (.f64 (pow.f64 x-scale 4) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (PI.f64)))) (pow.f64 b 4)))) (pow.f64 angle 3))))
(+.f64 (.f64 1/360 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (pow.f64 b 2))) (+.f64 (.f64 1/2 (.f64 (pow.f64 angle 5) (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)))))) (pow.f64 b 2)) (+.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))))) (pow.f64 b 2)) (.f64 1/180 (/.f64 (.f64 (pow.f64 x-scale 4) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (PI.f64) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))) (pow.f64 b 4)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (pow.f64 b 2)) (.f64 1/180 (/.f64 (.f64 (pow.f64 x-scale 4) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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))) (PI.f64)))) (pow.f64 b 4))))))) (.f64 1/2 (.f64 (-.f64 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 x-scale 2)) (pow.f64 b 2)) (.f64 1/180 (/.f64 (.f64 (pow.f64 x-scale 4) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (PI.f64)))) (pow.f64 b 4)))) (pow.f64 angle 3)))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 angle 7) (-.f64 (/.f64 (.f64 (+.f64 (.f64 -1/1469328076800000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7))) (+.f64 (.f64 -1/30855889612800000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7))) (+.f64 (.f64 -1/881596846080000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7))) (.f64 -1/4407984230400000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7)))))) (pow.f64 x-scale 2)) (pow.f64 b 2)) (+.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))))) (pow.f64 b 2)) (.f64 1/180 (/.f64 (.f64 (pow.f64 x-scale 4) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (PI.f64) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))) (pow.f64 b 4)))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 b 2)) (+.f64 (/.f64 (.f64 (-.f64 (/.f64 (.f64 (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))))) (pow.f64 x-scale 2)) (pow.f64 b 2)) (+.f64 (.f64 1/180 (/.f64 (.f64 (pow.f64 x-scale 4) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (PI.f64) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 b 4))) (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 x-scale 2)) (pow.f64 b 2)) (.f64 1/180 (/.f64 (.f64 (pow.f64 x-scale 4) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (PI.f64)))) (pow.f64 b 4)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (pow.f64 b 2)))) (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (pow.f64 b 2)) (.f64 1/180 (/.f64 (.f64 (pow.f64 x-scale 4) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (pow.f64 b 4)))))))) (+.f64 (.f64 1/360 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (pow.f64 b 2))) (+.f64 (.f64 1/2 (.f64 (pow.f64 angle 5) (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)))))) (pow.f64 b 2)) (+.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))))) (pow.f64 b 2)) (.f64 1/180 (/.f64 (.f64 (pow.f64 x-scale 4) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (PI.f64) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))) (pow.f64 b 4)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (pow.f64 b 2)) (.f64 1/180 (/.f64 (.f64 (pow.f64 x-scale 4) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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))) (PI.f64)))) (pow.f64 b 4))))))) (.f64 1/2 (.f64 (-.f64 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 x-scale 2)) (pow.f64 b 2)) (.f64 1/180 (/.f64 (.f64 (pow.f64 x-scale 4) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (PI.f64)))) (pow.f64 b 4)))) (pow.f64 angle 3))))))
(.f64 1/2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (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)) (/.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (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)) (/.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (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)) (/.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (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)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))
(.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 1/2 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 1/2 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (.f64 (pow.f64 b 6) (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))))) (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 b 2))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 b 2))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 2) (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (sin.f64 (.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 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 b 2))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 2) (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (sin.f64 (.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 1/2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (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) (pow.f64 b 6)))))))
(.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 b 2))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 b 2))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 2) (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (sin.f64 (.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 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 b 2))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 2) (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (sin.f64 (.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 1/2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (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) (pow.f64 b 6)))))))
(.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (pow.f64 a 2))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)))) (/.f64 (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 b 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 1/2 (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (pow.f64 a 2)))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)))) (/.f64 (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 b 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (+.f64 (.f64 1/2 (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (pow.f64 a 2))) (.f64 1/2 (/.f64 (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (.f64 (pow.f64 a 6) (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) (pow.f64 b 4)))))))
(.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (pow.f64 a 2))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))) (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (pow.f64 a 2)))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))) (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (pow.f64 a 2))))))
(.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (pow.f64 a 2))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))) (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (pow.f64 a 2)))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))) (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (pow.f64 a 2))))))
(.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (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) (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 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (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) (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 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (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) (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 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (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) (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 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (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) (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 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (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) (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 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (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) (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 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (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) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
1
(+.f64 1 (.f64 -1/64800 (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))
(+.f64 1 (+.f64 (.f64 1/25194240000 (.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (.f64 -1/64800 (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2)))))
(+.f64 (.f64 -1/24488801280000000 (.f64 (pow.f64 angle 6) (pow.f64 (PI.f64) 6))) (+.f64 1 (+.f64 (.f64 1/25194240000 (.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (.f64 -1/64800 (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 1/180 (.f64 angle (PI.f64)))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (.f64 1/180 (.f64 angle (PI.f64))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (+.f64 (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5))) (.f64 -1/30855889612800000000 (.f64 (pow.f64 angle 7) (pow.f64 (PI.f64) 7))))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 -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 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.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 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(.f64 -180 (/.f64 (pow.f64 b 2) (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))
(+.f64 (.f64 -180 (/.f64 (pow.f64 b 2) (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))) (.f64 -1 (.f64 angle (-.f64 (.f64 180 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 x-scale (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))))))
(+.f64 (.f64 -180 (/.f64 (pow.f64 b 2) (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))) (+.f64 (.f64 -1 (.f64 angle (-.f64 (.f64 180 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))))) (.f64 -1 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 32400 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))) (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (*.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64)))))))))
(+.f64 (.f64 -1 (.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (/.f64 (.f64 x-scale (+.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (PI.f64))) (+.f64 (.f64 32400 (/.f64 (.f64 (+.f64 (.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 -1/881596846080000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 -1/1469328076800000000 (pow.f64 (PI.f64) 7)) (.f64 -1/30855889612800000000 (pow.f64 (PI.f64) 7))))) (pow.f64 b 2)) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))) (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 32400 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))) (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64)))))))) (+.f64 (.f64 -180 (/.f64 (pow.f64 b 2) (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))) (+.f64 (.f64 -1 (.f64 angle (-.f64 (.f64 180 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))))) (.f64 -1 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 32400 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))) (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64))))))))))
(.f64 -1 (/.f64 (.f64 x-scale (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 -1 (/.f64 (.f64 x-scale (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 -1 (/.f64 (.f64 x-scale (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 -1 (/.f64 (.f64 x-scale (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 -1 (/.f64 (.f64 x-scale (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 -1 (/.f64 (.f64 x-scale (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 -1 (/.f64 (.f64 x-scale (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 -1 (/.f64 (.f64 x-scale (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(+.f64 (.f64 -1 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(+.f64 (.f64 -1 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 b 4) (-.f64 (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))) (pow.f64 a 2)))))
(+.f64 (.f64 -1 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 b 6) (-.f64 (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 4))) (.f64 -1 (/.f64 (.f64 (pow.f64 b 4) (-.f64 (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 2))))))
(.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 4))) (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 4) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 6))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 4))) (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 4))) (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 4) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 6))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 4))) (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(+.f64 (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 4) (-.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 b 2))) (+.f64 (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 4) (-.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 b 2))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 6) (-.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 b 4))) (+.f64 (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))) (pow.f64 a 2))))
(+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 4))) (.f64 -1 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2)))))
(+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 4)) (pow.f64 a 6))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 4))) (.f64 -1 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))) (pow.f64 a 2))))))
(/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))) (pow.f64 a 2))))
(+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 4))) (.f64 -1 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2)))))
(+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 4)) (pow.f64 a 6))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 4))) (.f64 -1 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))) (pow.f64 a 2))))))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))))
(.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))))
(.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))))
(.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (*.f64 x-scale x-scale)))))) 1)
(.f64 1 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (*.f64 x-scale x-scale)))))))
(.f64 (sqrt.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))) (sqrt.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))))))
(.f64 (sqrt.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (sqrt.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))))))
(.f64 (cbrt.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))) (.f64 (cbrt.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))) (cbrt.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))))))
(.f64 (.f64 (cbrt.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))) (cbrt.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))))) (cbrt.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))))
(.f64 (.f64 (cbrt.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (cbrt.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (cbrt.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))))
(.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))))
(.f64 (/.f64 1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))
(.f64 (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))
(pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))) 1)
(log.f64 (exp.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))))
(cbrt.f64 (.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))) (.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))) (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))))))
(expm1.f64 (log1p.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))))
(exp.f64 (log.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))))
(log1p.f64 (expm1.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))))
(.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 1)
(.f64 1 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(.f64 (sqrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (sqrt.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(.f64 (.f64 (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 1)
(log.f64 (exp.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(cbrt.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (pow.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))
(expm1.f64 (log1p.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(exp.f64 (log.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(log1p.f64 (expm1.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 1)
(.f64 1 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(.f64 (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (sqrt.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(.f64 (.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 1)
(log.f64 (exp.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(cbrt.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))
(expm1.f64 (log1p.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(exp.f64 (log.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(log1p.f64 (expm1.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 x-scale (.f64 -1/2 (/.f64 1 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))))))
(.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 -1/2 (.f64 x-scale (/.f64 1 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))))))
(.f64 (.f64 x-scale -1/2) (/.f64 1 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))))
(.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) 1)
(.f64 1 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))
(.f64 (sqrt.f64 (.f64 x-scale -1/2)) (.f64 (sqrt.f64 (.f64 x-scale -1/2)) (/.f64 1 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))))))
(.f64 (sqrt.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (sqrt.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))
(.f64 (.f64 (cbrt.f64 (.f64 x-scale -1/2)) (cbrt.f64 (.f64 x-scale -1/2))) (.f64 (cbrt.f64 (.f64 x-scale -1/2)) (/.f64 1 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))))))
(.f64 (cbrt.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 (cbrt.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (cbrt.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))))
(.f64 (.f64 (cbrt.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (cbrt.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))) (cbrt.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))
(.f64 (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))))
(.f64 (/.f64 1 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))) (.f64 x-scale -1/2))
(.f64 (.f64 (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (*.f64 x-scale x-scale)))))
(.f64 (.f64 (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))) 2)
(.f64 (.f64 (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) 1) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))
(.f64 (.f64 (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))) (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (*.f64 x-scale x-scale)))))))
(.f64 (.f64 (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (cbrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))) (cbrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))))) (cbrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (*.f64 x-scale x-scale)))))))
(pow.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))) 1)
(log.f64 (exp.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))
(cbrt.f64 (.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))))
(expm1.f64 (log1p.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))
(exp.f64 (log.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))
(log1p.f64 (expm1.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))

Outputs
(.f64 1/360 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (pow.f64 b 2)))
(.f64 1/360 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (.f64 (-.f64 (.f64 b b) (*.f64 a a)) (PI.f64))))))
(/.f64 1/360 (/.f64 (.f64 b b) (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (.f64 (.f64 x-scale x-scale) angle))))
(+.f64 (.f64 1/360 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (pow.f64 b 2))) (.f64 1/2 (.f64 (-.f64 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 x-scale 2)) (pow.f64 b 2)) (.f64 1/180 (/.f64 (.f64 (pow.f64 x-scale 4) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (PI.f64)))) (pow.f64 b 4)))) (pow.f64 angle 3))))
(fma.f64 1/360 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (.f64 (-.f64 (.f64 b b) (.f64 a a)) (PI.f64))))) (.f64 1/2 (.f64 (pow.f64 angle 3) (+.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 -1/180 (/.f64 (pow.f64 x-scale 4) (/.f64 (pow.f64 b 4) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (PI.f64) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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/360 (.f64 (.f64 (/.f64 x-scale b) (/.f64 x-scale b)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (.f64 1/2 (.f64 (pow.f64 angle 3) (+.f64 (.f64 (.f64 (/.f64 x-scale b) (/.f64 x-scale b)) (.f64 (pow.f64 (PI.f64) 3) (.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000))) (.f64 (.f64 (/.f64 (pow.f64 x-scale 4) (pow.f64 b 4)) (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (fma.f64 -1/32400 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale) (pow.f64 (PI.f64) 2)))))) -1/180)))))
(+.f64 (.f64 1/360 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (pow.f64 b 2))) (+.f64 (.f64 1/2 (.f64 (pow.f64 angle 5) (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)))))) (pow.f64 b 2)) (+.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))))) (pow.f64 b 2)) (.f64 1/180 (/.f64 (.f64 (pow.f64 x-scale 4) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (PI.f64) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))) (pow.f64 b 4)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (pow.f64 b 2)) (.f64 1/180 (/.f64 (.f64 (pow.f64 x-scale 4) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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))) (PI.f64)))) (pow.f64 b 4))))))) (.f64 1/2 (.f64 (-.f64 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 x-scale 2)) (pow.f64 b 2)) (.f64 1/180 (/.f64 (.f64 (pow.f64 x-scale 4) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (PI.f64)))) (pow.f64 b 4)))) (pow.f64 angle 3)))))
(fma.f64 1/360 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (.f64 (-.f64 (.f64 b b) (.f64 a a)) (PI.f64))))) (.f64 1/2 (+.f64 (.f64 (pow.f64 angle 5) (-.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 b b) (fma.f64 1/22674816000000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/1511654400000)))) (fma.f64 1/180 (/.f64 (pow.f64 x-scale 4) (/.f64 (pow.f64 b 4) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (PI.f64) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-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 x-scale x-scale) (/.f64 (.f64 b b) (.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (+.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 -1/180 (/.f64 (pow.f64 x-scale 4) (/.f64 (pow.f64 b 4) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (PI.f64) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (pow.f64 angle 3) (+.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 -1/180 (/.f64 (pow.f64 x-scale 4) (/.f64 (pow.f64 b 4) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (PI.f64) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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/360 (.f64 (.f64 (/.f64 x-scale b) (/.f64 x-scale b)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (.f64 1/2 (+.f64 (.f64 (pow.f64 angle 3) (+.f64 (.f64 (.f64 (/.f64 x-scale b) (/.f64 x-scale b)) (.f64 (pow.f64 (PI.f64) 3) (.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000))) (.f64 (.f64 (/.f64 (pow.f64 x-scale 4) (pow.f64 b 4)) (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (fma.f64 -1/32400 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale) (pow.f64 (PI.f64) 2)))))) -1/180))) (.f64 (pow.f64 angle 5) (-.f64 (.f64 (.f64 (/.f64 x-scale b) (/.f64 x-scale b)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/1417176000000)) (fma.f64 1/180 (.f64 (/.f64 (pow.f64 x-scale 4) (pow.f64 b 4)) (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (fma.f64 -1/3149280000 (.f64 (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale) (pow.f64 (PI.f64) 4)) (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 (/.f64 x-scale b) (/.f64 x-scale b)) 1/3149280000))))) (.f64 (.f64 (/.f64 x-scale b) (/.f64 x-scale b)) (.f64 (fma.f64 -1/32400 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale) (pow.f64 (PI.f64) 2)))) (+.f64 (.f64 (.f64 (/.f64 x-scale b) (/.f64 x-scale b)) (.f64 (pow.f64 (PI.f64) 3) (.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000))) (.f64 (.f64 (/.f64 (pow.f64 x-scale 4) (pow.f64 b 4)) (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (fma.f64 -1/32400 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (*.f64 (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale) (pow.f64 (PI.f64) 2)))))) -1/180))))))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 angle 7) (-.f64 (/.f64 (.f64 (+.f64 (.f64 -1/1469328076800000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7))) (+.f64 (.f64 -1/30855889612800000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7))) (+.f64 (.f64 -1/881596846080000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7))) (.f64 -1/4407984230400000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7)))))) (pow.f64 x-scale 2)) (pow.f64 b 2)) (+.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))))) (pow.f64 b 2)) (.f64 1/180 (/.f64 (.f64 (pow.f64 x-scale 4) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (PI.f64) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))) (pow.f64 b 4)))) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (pow.f64 b 2)) (+.f64 (/.f64 (.f64 (-.f64 (/.f64 (.f64 (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))))) (pow.f64 x-scale 2)) (pow.f64 b 2)) (+.f64 (.f64 1/180 (/.f64 (.f64 (pow.f64 x-scale 4) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (PI.f64) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)))))) (pow.f64 b 4))) (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 x-scale 2)) (pow.f64 b 2)) (.f64 1/180 (/.f64 (.f64 (pow.f64 x-scale 4) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (PI.f64)))) (pow.f64 b 4)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (pow.f64 b 2)))) (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (pow.f64 b 2)) (.f64 1/180 (/.f64 (.f64 (pow.f64 x-scale 4) (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (pow.f64 b 4)))))))) (+.f64 (.f64 1/360 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (pow.f64 b 2))) (+.f64 (.f64 1/2 (.f64 (pow.f64 angle 5) (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)))))) (pow.f64 b 2)) (+.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))))) (pow.f64 b 2)) (.f64 1/180 (/.f64 (.f64 (pow.f64 x-scale 4) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (PI.f64) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))))) (pow.f64 b 4)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (pow.f64 b 2)) (.f64 1/180 (/.f64 (.f64 (pow.f64 x-scale 4) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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))) (PI.f64)))) (pow.f64 b 4))))))) (.f64 1/2 (.f64 (-.f64 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 x-scale 2)) (pow.f64 b 2)) (.f64 1/180 (/.f64 (.f64 (pow.f64 x-scale 4) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 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 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (PI.f64)))) (pow.f64 b 4)))) (pow.f64 angle 3))))))
(fma.f64 1/2 (.f64 (pow.f64 angle 7) (-.f64 (/.f64 (fma.f64 -1/1469328076800000000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 7)) (fma.f64 -1/30855889612800000000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 7)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 7)) -1/734664038400000000))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (+.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 -1/180 (/.f64 (pow.f64 x-scale 4) (/.f64 (pow.f64 b 4) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (PI.f64) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-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 b b)) (+.f64 (/.f64 (-.f64 (/.f64 (fma.f64 1/2267481600000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/3779136000000)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (fma.f64 1/180 (/.f64 (pow.f64 x-scale 4) (/.f64 (pow.f64 b 4) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (PI.f64) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-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 x-scale x-scale) (/.f64 (.f64 b b) (.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (+.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 -1/180 (/.f64 (pow.f64 x-scale 4) (/.f64 (pow.f64 b 4) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (PI.f64) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 b b) (.f64 (.f64 x-scale x-scale) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))))))) (.f64 1/180 (/.f64 (pow.f64 x-scale 4) (/.f64 (pow.f64 b 4) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (PI.f64)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (.f64 x-scale x-scale))))))))))) (fma.f64 1/360 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (.f64 (-.f64 (.f64 b b) (.f64 a a)) (PI.f64))))) (.f64 1/2 (+.f64 (.f64 (pow.f64 angle 5) (-.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 b b) (fma.f64 1/22674816000000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/1511654400000)))) (fma.f64 1/180 (/.f64 (pow.f64 x-scale 4) (/.f64 (pow.f64 b 4) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (PI.f64) (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-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 x-scale x-scale) (/.f64 (.f64 b b) (.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (+.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 -1/180 (/.f64 (pow.f64 x-scale 4) (/.f64 (pow.f64 b 4) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (PI.f64) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (pow.f64 angle 3) (+.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 -1/180 (/.f64 (pow.f64 x-scale 4) (/.f64 (pow.f64 b 4) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (PI.f64) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (*.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))))))))))))
(fma.f64 1/2 (.f64 (pow.f64 angle 7) (-.f64 (.f64 (/.f64 (fma.f64 -1/1469328076800000000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 7)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 7)) -43/30855889612800000000)) (.f64 b b)) (.f64 x-scale x-scale)) (+.f64 (.f64 (/.f64 (-.f64 (.f64 (.f64 (/.f64 x-scale b) (/.f64 x-scale b)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/1417176000000)) (fma.f64 1/180 (.f64 (/.f64 (pow.f64 x-scale 4) (pow.f64 b 4)) (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (fma.f64 -1/3149280000 (.f64 (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale) (pow.f64 (PI.f64) 4)) (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 (/.f64 x-scale b) (/.f64 x-scale b)) 1/3149280000))))) (.f64 (.f64 (/.f64 x-scale b) (/.f64 x-scale b)) (.f64 (fma.f64 -1/32400 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale) (pow.f64 (PI.f64) 2)))) (+.f64 (.f64 (.f64 (/.f64 x-scale b) (/.f64 x-scale b)) (.f64 (pow.f64 (PI.f64) 3) (.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000))) (.f64 (.f64 (/.f64 (pow.f64 x-scale 4) (pow.f64 b 4)) (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (fma.f64 -1/32400 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale) (pow.f64 (PI.f64) 2)))))) -1/180)))))) (.f64 b b)) (.f64 x-scale (.f64 x-scale (fma.f64 -1/32400 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale) (pow.f64 (PI.f64) 2))))))) (+.f64 (/.f64 (.f64 1/180 (pow.f64 x-scale 4)) (/.f64 (/.f64 (pow.f64 b 4) (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)) (.f64 (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))))) (.f64 (.f64 (/.f64 x-scale b) (/.f64 x-scale b)) (.f64 (+.f64 (.f64 (.f64 (/.f64 x-scale b) (/.f64 x-scale b)) (.f64 (pow.f64 (PI.f64) 3) (.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000))) (.f64 (.f64 (/.f64 (pow.f64 x-scale 4) (pow.f64 b 4)) (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (fma.f64 -1/32400 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale) (pow.f64 (PI.f64) 2)))))) -1/180)) (fma.f64 -1/3149280000 (.f64 (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale) (pow.f64 (PI.f64) 4)) (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 (/.f64 x-scale b) (/.f64 x-scale b)) 1/3149280000))))))))) (fma.f64 1/360 (.f64 (.f64 (/.f64 x-scale b) (/.f64 x-scale b)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (.f64 1/2 (+.f64 (.f64 (pow.f64 angle 3) (+.f64 (.f64 (.f64 (/.f64 x-scale b) (/.f64 x-scale b)) (.f64 (pow.f64 (PI.f64) 3) (.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000))) (.f64 (.f64 (/.f64 (pow.f64 x-scale 4) (pow.f64 b 4)) (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (fma.f64 -1/32400 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale) (pow.f64 (PI.f64) 2)))))) -1/180))) (.f64 (pow.f64 angle 5) (-.f64 (.f64 (.f64 (/.f64 x-scale b) (/.f64 x-scale b)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/1417176000000)) (fma.f64 1/180 (.f64 (/.f64 (pow.f64 x-scale 4) (pow.f64 b 4)) (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (fma.f64 -1/3149280000 (.f64 (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale) (pow.f64 (PI.f64) 4)) (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 (/.f64 x-scale b) (/.f64 x-scale b)) 1/3149280000))))) (.f64 (.f64 (/.f64 x-scale b) (/.f64 x-scale b)) (.f64 (fma.f64 -1/32400 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale) (pow.f64 (PI.f64) 2)))) (+.f64 (.f64 (.f64 (/.f64 x-scale b) (/.f64 x-scale b)) (.f64 (pow.f64 (PI.f64) 3) (.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000))) (.f64 (.f64 (/.f64 (pow.f64 x-scale 4) (pow.f64 b 4)) (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (fma.f64 -1/32400 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale) (pow.f64 (PI.f64) 2)))))) -1/180)))))))))))
(.f64 1/2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 1/2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 1/2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 1/2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 1/2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (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)) (/.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 1/2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (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)) (/.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 1/2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (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)) (/.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 1/2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (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)) (/.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 -1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (.f64 -1/2 (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(fma.f64 1/2 (.f64 (.f64 b b) (-.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 a a)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 a a)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))))) (.f64 -1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(fma.f64 1/2 (.f64 b (.f64 b (-.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 x-scale (/.f64 a (/.f64 x-scale a)))) (neg.f64 (/.f64 x-scale (/.f64 (/.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) x-scale)))))) (/.f64 (.f64 -1/2 (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 1/2 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(fma.f64 -1/2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (/.f64 (.f64 (pow.f64 b 4) (-.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 a a)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 a a)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (.f64 b b) (-.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 a a)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 a a)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))))) (.f64 -1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(fma.f64 -1/2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a)) (/.f64 (-.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 x-scale (/.f64 a (/.f64 x-scale a)))) (neg.f64 (/.f64 x-scale (/.f64 (/.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) x-scale)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 b 4)))) (fma.f64 1/2 (.f64 b (.f64 b (-.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 x-scale (/.f64 a (/.f64 x-scale a)))) (neg.f64 (/.f64 x-scale (/.f64 (/.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) x-scale)))))) (/.f64 (.f64 -1/2 (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 1/2 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (.f64 (pow.f64 b 6) (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))))) (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 -1/2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (/.f64 (.f64 (pow.f64 b 4) (-.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 a a)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 a a)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/2 (.f64 (.f64 b b) (-.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 a a)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 a a)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))))) (fma.f64 1/2 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (-.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 a a)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 a a)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (pow.f64 b 6)))) (.f64 -1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(fma.f64 -1/2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a a)) (/.f64 (-.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 x-scale (/.f64 a (/.f64 x-scale a)))) (neg.f64 (/.f64 x-scale (/.f64 (/.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) x-scale)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 b 4)))) (fma.f64 1/2 (.f64 b (.f64 b (-.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 x-scale (/.f64 a (/.f64 x-scale a)))) (neg.f64 (/.f64 x-scale (/.f64 (/.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) x-scale)))))) (fma.f64 1/2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4))) (.f64 (-.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 x-scale (/.f64 a (/.f64 x-scale a)))) (neg.f64 (/.f64 x-scale (/.f64 (/.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) x-scale)))) (pow.f64 b 6))) (/.f64 (.f64 -1/2 (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))))
(.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 1/2 (.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 b 2))))
(.f64 1/2 (+.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (-.f64 (neg.f64 (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (.f64 a a)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (*.f64 b b))))
(.f64 1/2 (+.f64 (.f64 (/.f64 x-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale)) (.f64 a (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))))) (.f64 b b))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 b 2))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 2) (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (sin.f64 (.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))))))
(fma.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (.f64 a a)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (.f64 b b)) (.f64 -1/2 (.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 (neg.f64 (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (.f64 a a)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (pow.f64 b 4))))))
(fma.f64 1/2 (.f64 (/.f64 x-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale)) (.f64 a (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))))) (.f64 b b)) (.f64 -1/2 (.f64 (/.f64 a (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) a)) (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale)) (.f64 a (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))))) (/.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 b 2))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 2) (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (sin.f64 (.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 1/2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (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) (pow.f64 b 6)))))))
(fma.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (.f64 a a)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (.f64 b b)) (fma.f64 -1/2 (.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 (neg.f64 (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (.f64 a a)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (pow.f64 b 4))) (.f64 1/2 (.f64 (/.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (-.f64 (neg.f64 (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (.f64 a a)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (pow.f64 b 6)))))))
(fma.f64 1/2 (.f64 (/.f64 x-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale)) (.f64 a (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))))) (.f64 b b)) (fma.f64 -1/2 (.f64 (/.f64 a (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) a)) (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale)) (.f64 a (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))))) (/.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (/.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4)) (.f64 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale)) (.f64 a (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))))) (/.f64 (pow.f64 b 6) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4))) 1/2)))))
(.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 1/2 (.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 b 2))))
(.f64 1/2 (+.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (-.f64 (neg.f64 (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (.f64 a a)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (*.f64 b b))))
(.f64 1/2 (+.f64 (.f64 (/.f64 x-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale)) (.f64 a (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))))) (.f64 b b))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 b 2))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 2) (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (sin.f64 (.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))))))
(fma.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (.f64 a a)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (.f64 b b)) (.f64 -1/2 (.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 (neg.f64 (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (.f64 a a)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (pow.f64 b 4))))))
(fma.f64 1/2 (.f64 (/.f64 x-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale)) (.f64 a (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))))) (.f64 b b)) (.f64 -1/2 (.f64 (/.f64 a (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) a)) (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale)) (.f64 a (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))))) (/.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 b 2))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 2) (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (sin.f64 (.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 1/2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (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) (pow.f64 b 6)))))))
(fma.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (.f64 a a)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (.f64 b b)) (fma.f64 -1/2 (.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 (neg.f64 (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (.f64 a a)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (pow.f64 b 4))) (.f64 1/2 (.f64 (/.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (-.f64 (neg.f64 (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (.f64 a a)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (pow.f64 b 6)))))))
(fma.f64 1/2 (.f64 (/.f64 x-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (fma.f64 1/2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale)) (.f64 a (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))))) (.f64 b b)) (fma.f64 -1/2 (.f64 (/.f64 a (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) a)) (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale)) (.f64 a (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))))) (/.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (/.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4)) (.f64 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 x-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale)) (.f64 a (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))))) (/.f64 (pow.f64 b 6) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4))) 1/2)))))
(.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 1/2 (.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (pow.f64 a 2))))
(.f64 1/2 (+.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 (.f64 a a) (-.f64 (neg.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 b b)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))))))
(.f64 1/2 (+.f64 (.f64 (/.f64 x-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 (.f64 a a) (-.f64 (neg.f64 (/.f64 x-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 b (/.f64 x-scale b)))))) (/.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)))) (/.f64 (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 b 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 1/2 (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (pow.f64 a 2)))))
(fma.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1/2 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (-.f64 (neg.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 b b)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))))) (.f64 1/2 (.f64 (.f64 a a) (-.f64 (neg.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 b b)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3))))))))
(fma.f64 1/2 (.f64 (/.f64 x-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (fma.f64 -1/2 (.f64 (/.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (-.f64 (neg.f64 (/.f64 x-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 b (/.f64 x-scale b)))))) (/.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))) (/.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (.f64 a a) (.f64 1/2 (-.f64 (neg.f64 (/.f64 x-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 b (/.f64 x-scale b)))))) (/.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)))) (/.f64 (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 b 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (+.f64 (.f64 1/2 (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (pow.f64 a 2))) (.f64 1/2 (/.f64 (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (.f64 (pow.f64 a 6) (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) (pow.f64 b 4)))))))
(fma.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1/2 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (-.f64 (neg.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 b b)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))))) (.f64 1/2 (+.f64 (.f64 (.f64 a a) (-.f64 (neg.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 b b)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 b b)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 4) (pow.f64 a 6))))))))
(fma.f64 1/2 (.f64 (/.f64 x-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) x-scale)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (fma.f64 -1/2 (.f64 (/.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (-.f64 (neg.f64 (/.f64 x-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 b (/.f64 x-scale b)))))) (/.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))) (/.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 1/2 (+.f64 (.f64 (.f64 a a) (-.f64 (neg.f64 (/.f64 x-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 b (/.f64 x-scale b)))))) (/.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)))) (/.f64 (-.f64 (neg.f64 (/.f64 x-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 b (/.f64 x-scale b)))))) (/.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (/.f64 (pow.f64 b 4) (pow.f64 a 6)))))))))
(.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 -1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (.f64 -1/2 (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (pow.f64 a 2))))
(fma.f64 -1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))))) (*.f64 a a))))
(fma.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 1/2 (/.f64 (.f64 a a) (-.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 b (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (neg.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) 3))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))) (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (pow.f64 a 2)))))
(fma.f64 -1/2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))))) (pow.f64 a 4)) (/.f64 (.f64 (.f64 b b) (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/2 (/.f64 (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))))) (*.f64 a a)))))
(fma.f64 -1/2 (.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 b (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (neg.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))))) (pow.f64 a 4)) (/.f64 (.f64 b b) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 1/2 (/.f64 (.f64 a a) (-.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 b (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (neg.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) 3)))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))) (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (pow.f64 a 2))))))
(fma.f64 -1/2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))))) (pow.f64 a 4)) (/.f64 (.f64 (.f64 b b) (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/2 (/.f64 (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 1/2 (+.f64 (.f64 (/.f64 (-.f64 (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))))) (pow.f64 a 6)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (-.f64 (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))))) (.f64 a a))))))
(fma.f64 -1/2 (.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 b (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (neg.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))))) (pow.f64 a 4)) (/.f64 (.f64 b b) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 1/2 (+.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 b (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (neg.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))))) (.f64 a a)) (.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 b (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (neg.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))))) (pow.f64 a 6)) (/.f64 (pow.f64 b 4) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) 4))))))))
(.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 -1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (.f64 -1/2 (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (pow.f64 a 2))))
(fma.f64 -1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))))) (*.f64 a a))))
(fma.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 1/2 (/.f64 (.f64 a a) (-.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 b (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (neg.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) 3))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))) (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3)))) (pow.f64 a 2)))))
(fma.f64 -1/2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))))) (pow.f64 a 4)) (/.f64 (.f64 (.f64 b b) (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/2 (/.f64 (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))))) (*.f64 a a)))))
(fma.f64 -1/2 (.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 b (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (neg.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))))) (pow.f64 a 4)) (/.f64 (.f64 b b) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 1/2 (/.f64 (.f64 a a) (-.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 b (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (neg.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) 3)))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))) (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 -1 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (pow.f64 a 2))))))
(fma.f64 -1/2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))))) (pow.f64 a 4)) (/.f64 (.f64 (.f64 b b) (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/2 (/.f64 (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 1/2 (+.f64 (.f64 (/.f64 (-.f64 (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))))) (pow.f64 a 6)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (-.f64 (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))))) (.f64 a a))))))
(fma.f64 -1/2 (.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 b (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (neg.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))))) (pow.f64 a 4)) (/.f64 (.f64 b b) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (fma.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 1/2 (+.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 b (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (neg.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))))) (.f64 a a)) (.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 b (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (neg.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))))) (pow.f64 a 6)) (/.f64 (pow.f64 b 4) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) 4))))))))
(.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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 x-scale x-scale) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(/.f64 (.f64 1/2 (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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 x-scale x-scale) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(/.f64 (.f64 1/2 (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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 x-scale x-scale) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(/.f64 (.f64 1/2 (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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 x-scale x-scale) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(/.f64 (.f64 1/2 (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (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) (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 x-scale x-scale) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(/.f64 (.f64 1/2 (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (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) (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 x-scale x-scale) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(/.f64 (.f64 1/2 (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (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) (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 x-scale x-scale) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(/.f64 (.f64 1/2 (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (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) (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 x-scale x-scale) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(/.f64 (.f64 1/2 (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (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) (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 x-scale x-scale) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(/.f64 (.f64 1/2 (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (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) (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 x-scale x-scale) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(/.f64 (.f64 1/2 (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (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) (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 x-scale x-scale) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(/.f64 (.f64 1/2 (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (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) (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 x-scale x-scale) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(/.f64 (.f64 1/2 (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
1
(+.f64 1 (.f64 -1/64800 (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))
(+.f64 1 (.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 2) (*.f64 angle angle))))
(+.f64 1 (.f64 (pow.f64 (PI.f64) 2) (.f64 -1/64800 (*.f64 angle angle))))
(+.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 (PI.f64) 4) (pow.f64 angle 4)) (.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 2) (.f64 angle angle)))))
(+.f64 1 (fma.f64 1/25194240000 (.f64 (pow.f64 (PI.f64) 4) (pow.f64 angle 4)) (.f64 (pow.f64 (PI.f64) 2) (.f64 -1/64800 (.f64 angle angle)))))
(+.f64 (.f64 -1/24488801280000000 (.f64 (pow.f64 angle 6) (pow.f64 (PI.f64) 6))) (+.f64 1 (+.f64 (.f64 1/25194240000 (.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (.f64 -1/64800 (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))))
(fma.f64 -1/24488801280000000 (.f64 (pow.f64 (PI.f64) 6) (pow.f64 angle 6)) (+.f64 1 (fma.f64 1/25194240000 (.f64 (pow.f64 (PI.f64) 4) (pow.f64 angle 4)) (.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 2) (*.f64 angle angle))))))
(fma.f64 -1/24488801280000000 (.f64 (pow.f64 (PI.f64) 6) (pow.f64 angle 6)) (+.f64 1 (fma.f64 1/25194240000 (.f64 (pow.f64 (PI.f64) 4) (pow.f64 angle 4)) (.f64 (pow.f64 (PI.f64) 2) (.f64 -1/64800 (*.f64 angle angle))))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 angle 1/180))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (.f64 1/180 (.f64 angle (PI.f64))))
(fma.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)) (.f64 1/180 (*.f64 angle (PI.f64))))
(fma.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)) (.f64 (PI.f64) (*.f64 angle 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 (PI.f64) 3) (pow.f64 angle 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/34992000 (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)) (fma.f64 1/180 (.f64 angle (PI.f64)) (.f64 (pow.f64 angle 5) (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (+.f64 (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5))) (.f64 -1/30855889612800000000 (.f64 (pow.f64 angle 7) (pow.f64 (PI.f64) 7))))))
(fma.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)) (fma.f64 1/180 (.f64 angle (PI.f64)) (fma.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)) (.f64 -1/30855889612800000000 (*.f64 (pow.f64 angle 7) (pow.f64 (PI.f64) 7))))))
(fma.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)) (fma.f64 1/180 (.f64 angle (PI.f64)) (fma.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)) (.f64 (pow.f64 angle 7) (*.f64 (pow.f64 (PI.f64) 7) -1/30855889612800000000)))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(.f64 -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 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) x-scale))))
(.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 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) x-scale))))
(.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 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) x-scale))))
(.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 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) x-scale))))
(.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 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) x-scale))))
(.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 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) x-scale))))
(.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 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) x-scale))))
(.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 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) x-scale))))
(.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 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) x-scale))))
(.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 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) x-scale))))
(.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 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) x-scale))))
(.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 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) x-scale))))
(.f64 -180 (/.f64 (pow.f64 b 2) (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))
(.f64 -180 (/.f64 (.f64 b b) (.f64 (.f64 x-scale angle) (.f64 (-.f64 (.f64 b b) (*.f64 a a)) (PI.f64)))))
(.f64 -180 (/.f64 (/.f64 (.f64 b b) (.f64 x-scale angle)) (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64)))))
(+.f64 (.f64 -180 (/.f64 (pow.f64 b 2) (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))) (.f64 -1 (.f64 angle (-.f64 (.f64 180 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 x-scale (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))))))
(fma.f64 -180 (/.f64 (.f64 b b) (.f64 (.f64 x-scale angle) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (PI.f64)))) (neg.f64 (.f64 angle (-.f64 (.f64 180 (/.f64 x-scale (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (PI.f64)) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 32400 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))) (.f64 x-scale (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2))))))))
(fma.f64 -180 (/.f64 (/.f64 (.f64 b b) (.f64 x-scale angle)) (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (neg.f64 (.f64 angle (fma.f64 180 (.f64 (/.f64 x-scale (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (fma.f64 -1/32400 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale) (pow.f64 (PI.f64) 2))))) (neg.f64 (/.f64 (.f64 32400 (.f64 (pow.f64 (PI.f64) 3) (.f64 -1/8748000 (.f64 b b)))) (.f64 x-scale (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))))))))
(+.f64 (.f64 -180 (/.f64 (pow.f64 b 2) (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))) (+.f64 (.f64 -1 (.f64 angle (-.f64 (.f64 180 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))))) (.f64 -1 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 32400 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))) (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (*.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64)))))))))
(fma.f64 -180 (/.f64 (.f64 b b) (.f64 (.f64 x-scale angle) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (PI.f64)))) (.f64 -1 (+.f64 (.f64 angle (-.f64 (.f64 180 (/.f64 x-scale (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (PI.f64)) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 32400 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))) (.f64 x-scale (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))))) (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (PI.f64)))) (fma.f64 32400 (.f64 (/.f64 (.f64 b b) x-scale) (/.f64 (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))) (.f64 180 (/.f64 (-.f64 (.f64 180 (/.f64 x-scale (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (PI.f64)) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 32400 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))) (.f64 x-scale (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2))))) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))))))))))
(fma.f64 -180 (/.f64 (/.f64 (.f64 b b) (.f64 x-scale angle)) (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (.f64 -1 (+.f64 (.f64 angle (fma.f64 180 (.f64 (/.f64 x-scale (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (fma.f64 -1/32400 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale) (pow.f64 (PI.f64) 2))))) (neg.f64 (/.f64 (.f64 32400 (.f64 (pow.f64 (PI.f64) 3) (.f64 -1/8748000 (.f64 b b)))) (.f64 x-scale (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2))))))) (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (.f64 (/.f64 x-scale (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (fma.f64 -1/3149280000 (.f64 (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale) (pow.f64 (PI.f64) 4)) (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 (/.f64 x-scale b) (/.f64 x-scale b)) 1/3149280000))))) (fma.f64 32400 (.f64 (/.f64 b (/.f64 x-scale b)) (/.f64 (.f64 (pow.f64 (PI.f64) 5) 1/1417176000000) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))) (/.f64 (.f64 180 (fma.f64 180 (.f64 (/.f64 x-scale (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (fma.f64 -1/32400 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale) (pow.f64 (PI.f64) 2))))) (neg.f64 (/.f64 (.f64 32400 (.f64 (pow.f64 (PI.f64) 3) (.f64 -1/8748000 (.f64 b b)))) (.f64 x-scale (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2))))))) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)))))))))
(+.f64 (.f64 -1 (.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (/.f64 (.f64 x-scale (+.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (PI.f64))) (+.f64 (.f64 32400 (/.f64 (.f64 (+.f64 (.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 -1/881596846080000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 -1/1469328076800000000 (pow.f64 (PI.f64) 7)) (.f64 -1/30855889612800000000 (pow.f64 (PI.f64) 7))))) (pow.f64 b 2)) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))) (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 32400 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))) (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64)))))))) (+.f64 (.f64 -180 (/.f64 (pow.f64 b 2) (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))) (+.f64 (.f64 -1 (.f64 angle (-.f64 (.f64 180 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))))) (.f64 -1 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (/.f64 (.f64 (+.f64 (.f64 1/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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 32400 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))) (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 32400 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64))))))))))
(fma.f64 -1 (.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (/.f64 x-scale (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (PI.f64)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (.f64 x-scale x-scale)))))) (fma.f64 180 (/.f64 (-.f64 (.f64 180 (/.f64 x-scale (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (PI.f64)) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 32400 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))) (.f64 x-scale (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2))))) (/.f64 (PI.f64) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000)))) (fma.f64 32400 (.f64 (/.f64 (fma.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7) (fma.f64 -1/881596846080000000 (pow.f64 (PI.f64) 7) (.f64 (pow.f64 (PI.f64) 7) -11/15427944806400000000))) x-scale) (/.f64 (.f64 b b) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))) (.f64 180 (/.f64 (-.f64 (.f64 180 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (PI.f64)))) (fma.f64 32400 (.f64 (/.f64 (.f64 b b) x-scale) (/.f64 (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))) (.f64 180 (/.f64 (-.f64 (.f64 180 (/.f64 x-scale (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (PI.f64)) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 32400 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))) (.f64 x-scale (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2))))) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)))))) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)))))))) (fma.f64 -180 (/.f64 (.f64 b b) (.f64 (.f64 x-scale angle) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (PI.f64)))) (.f64 -1 (+.f64 (.f64 angle (-.f64 (.f64 180 (/.f64 x-scale (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (PI.f64)) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 32400 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))) (.f64 x-scale (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))))) (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (PI.f64)))) (fma.f64 32400 (.f64 (/.f64 (.f64 b b) x-scale) (/.f64 (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))) (.f64 180 (/.f64 (-.f64 (.f64 180 (/.f64 x-scale (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (PI.f64)) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 32400 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))) (.f64 x-scale (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2))))) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)))))))))))
(fma.f64 -1 (.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (-.f64 (.f64 (/.f64 x-scale (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)) (.f64 (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)))) (/.f64 (fma.f64 180 (.f64 (/.f64 x-scale (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (fma.f64 -1/32400 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale) (pow.f64 (PI.f64) 2))))) (neg.f64 (/.f64 (.f64 32400 (.f64 (pow.f64 (PI.f64) 3) (.f64 -1/8748000 (.f64 b b)))) (.f64 x-scale (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))))) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 5) 1/1417176000000))))) (fma.f64 32400 (.f64 (/.f64 (fma.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7) (.f64 (pow.f64 (PI.f64) 7) -19/10285296537600000000)) x-scale) (/.f64 (.f64 b b) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))) (/.f64 (.f64 (-.f64 (.f64 180 (.f64 (/.f64 x-scale (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (fma.f64 -1/3149280000 (.f64 (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale) (pow.f64 (PI.f64) 4)) (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 (/.f64 x-scale b) (/.f64 x-scale b)) 1/3149280000))))) (fma.f64 32400 (.f64 (/.f64 b (/.f64 x-scale b)) (/.f64 (.f64 (pow.f64 (PI.f64) 5) 1/1417176000000) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))) (/.f64 (.f64 180 (fma.f64 180 (.f64 (/.f64 x-scale (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (fma.f64 -1/32400 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale) (pow.f64 (PI.f64) 2))))) (neg.f64 (/.f64 (.f64 32400 (.f64 (pow.f64 (PI.f64) 3) (.f64 -1/8748000 (.f64 b b)))) (.f64 x-scale (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2))))))) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))))) 180) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)))))) (fma.f64 -180 (/.f64 (/.f64 (.f64 b b) (.f64 x-scale angle)) (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (.f64 -1 (+.f64 (.f64 angle (fma.f64 180 (.f64 (/.f64 x-scale (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (fma.f64 -1/32400 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale) (pow.f64 (PI.f64) 2))))) (neg.f64 (/.f64 (.f64 32400 (.f64 (pow.f64 (PI.f64) 3) (.f64 -1/8748000 (.f64 b b)))) (.f64 x-scale (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2))))))) (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (.f64 (/.f64 x-scale (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (fma.f64 -1/3149280000 (.f64 (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale) (pow.f64 (PI.f64) 4)) (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 (/.f64 x-scale b) (/.f64 x-scale b)) 1/3149280000))))) (fma.f64 32400 (.f64 (/.f64 b (/.f64 x-scale b)) (/.f64 (.f64 (pow.f64 (PI.f64) 5) 1/1417176000000) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))) (/.f64 (.f64 180 (fma.f64 180 (.f64 (/.f64 x-scale (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (fma.f64 -1/32400 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale) (pow.f64 (PI.f64) 2))))) (neg.f64 (/.f64 (.f64 32400 (.f64 (pow.f64 (PI.f64) 3) (.f64 -1/8748000 (.f64 b b)))) (.f64 x-scale (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2))))))) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))))))))))
(.f64 -1 (/.f64 (.f64 x-scale (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(neg.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 -1 (/.f64 (.f64 x-scale (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(neg.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 -1 (/.f64 (.f64 x-scale (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(neg.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 -1 (/.f64 (.f64 x-scale (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(neg.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 -1 (/.f64 (.f64 x-scale (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(neg.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 -1 (/.f64 (.f64 x-scale (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(neg.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 -1 (/.f64 (.f64 x-scale (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(neg.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 -1 (/.f64 (.f64 x-scale (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(neg.f64 (/.f64 x-scale (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(+.f64 (.f64 -1 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(fma.f64 -1 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(fma.f64 -1 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (.f64 a (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (.f64 a a)))))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))))
(+.f64 (.f64 -1 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 b 4) (-.f64 (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))) (pow.f64 a 2)))))
(+.f64 (fma.f64 -1 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (neg.f64 (/.f64 (.f64 (pow.f64 b 4) (-.f64 (neg.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (*.f64 a a))))
(+.f64 (fma.f64 -1 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (.f64 a (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (.f64 a a)))))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (neg.f64 (.f64 (/.f64 (pow.f64 b 4) (.f64 a a)) (-.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (.f64 a (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (*.f64 a a))))))))
(+.f64 (.f64 -1 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 b 6) (-.f64 (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 4))) (.f64 -1 (/.f64 (.f64 (pow.f64 b 4) (-.f64 (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 2))))))
(+.f64 (fma.f64 -1 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (+.f64 (/.f64 (pow.f64 b 6) (/.f64 (pow.f64 a 4) (-.f64 (neg.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (/.f64 (.f64 (pow.f64 b 4) (-.f64 (neg.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 a a) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 a a)))))
(+.f64 (fma.f64 -1 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (.f64 a (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (.f64 a a)))))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (.f64 -1 (+.f64 (.f64 (/.f64 (pow.f64 b 4) (.f64 a a)) (-.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (.f64 a (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (.f64 a a)))))) (.f64 (/.f64 (pow.f64 b 6) (pow.f64 a 4)) (-.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (.f64 a (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (*.f64 a a)))))))))
(.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))))
(+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 -1 (+.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 b b)) (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(.f64 -1 (+.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (/.f64 (-.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 a a))) (neg.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 a (/.f64 x-scale a))))) (.f64 b b))))
(+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 4))) (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 -1 (/.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 b b)) (.f64 -1 (+.f64 (/.f64 (.f64 a a) (/.f64 (pow.f64 b 4) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 -1 (+.f64 (/.f64 (-.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 a a))) (neg.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 a (/.f64 x-scale a))))) (.f64 b b)) (+.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (.f64 (/.f64 (.f64 a a) (pow.f64 b 4)) (-.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 a a))) (neg.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a (/.f64 x-scale a)))))))))
(+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 4) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 6))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 4))) (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(fma.f64 -1 (/.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 b b)) (fma.f64 -1 (/.f64 (pow.f64 a 4) (/.f64 (pow.f64 b 6) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -1 (+.f64 (/.f64 (.f64 a a) (/.f64 (pow.f64 b 4) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 -1 (/.f64 (-.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 a a))) (neg.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 a (/.f64 x-scale a))))) (.f64 b b)) (.f64 -1 (+.f64 (+.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (.f64 (/.f64 (.f64 a a) (pow.f64 b 4)) (-.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 a a))) (neg.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 a (/.f64 x-scale a))))))) (.f64 (/.f64 (pow.f64 a 4) (pow.f64 b 6)) (-.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 a a))) (neg.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a (/.f64 x-scale a)))))))))
(.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))))
(+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 -1 (+.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 b b)) (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(.f64 -1 (+.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (/.f64 (-.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 a a))) (neg.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 a (/.f64 x-scale a))))) (.f64 b b))))
(+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 4))) (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 -1 (/.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 b b)) (.f64 -1 (+.f64 (/.f64 (.f64 a a) (/.f64 (pow.f64 b 4) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 -1 (+.f64 (/.f64 (-.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 a a))) (neg.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 a (/.f64 x-scale a))))) (.f64 b b)) (+.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (.f64 (/.f64 (.f64 a a) (pow.f64 b 4)) (-.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 a a))) (neg.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a (/.f64 x-scale a)))))))))
(+.f64 (.f64 -1 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 4) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 6))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 4))) (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(fma.f64 -1 (/.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 b b)) (fma.f64 -1 (/.f64 (pow.f64 a 4) (/.f64 (pow.f64 b 6) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -1 (+.f64 (/.f64 (.f64 a a) (/.f64 (pow.f64 b 4) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 -1 (/.f64 (-.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 a a))) (neg.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 a (/.f64 x-scale a))))) (.f64 b b)) (.f64 -1 (+.f64 (+.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (.f64 (/.f64 (.f64 a a) (pow.f64 b 4)) (-.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 a a))) (neg.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 a (/.f64 x-scale a))))))) (.f64 (/.f64 (pow.f64 a 4) (pow.f64 b 6)) (-.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 a a))) (neg.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a (/.f64 x-scale a)))))))))
(.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))))
(+.f64 (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 -1 (+.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1 (+.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (.f64 a (.f64 a (+.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (.f64 b b)))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (.f64 b b)))))))))
(+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 4) (-.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 b 2))) (+.f64 (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(fma.f64 -1 (/.f64 (pow.f64 a 4) (/.f64 (.f64 b b) (-.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -1 (+.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 -1 (+.f64 (+.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (.f64 a (.f64 a (+.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (.f64 b b)))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (.f64 b b)))))))) (.f64 (/.f64 (pow.f64 a 4) (.f64 b b)) (+.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (.f64 b b)))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (.f64 b b))))))))
(+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 4) (-.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 b 2))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 6) (-.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 b 4))) (+.f64 (.f64 -1 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (.f64 -1 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.f64 -1 (/.f64 (pow.f64 a 4) (/.f64 (.f64 b b) (-.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (fma.f64 -1 (/.f64 (.f64 (pow.f64 a 6) (-.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 4)) (.f64 -1 (+.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 -1 (.f64 (/.f64 (pow.f64 a 4) (.f64 b b)) (+.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (.f64 b b)))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (.f64 b b)))))) (.f64 -1 (+.f64 (+.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (.f64 a (.f64 a (+.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (.f64 b b)))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (.f64 b b)))))))) (.f64 (/.f64 (pow.f64 a 6) (pow.f64 b 4)) (+.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (.f64 b b)))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (*.f64 b b)))))))))
(/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))) (pow.f64 a 2))))
(+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 b b) x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 a a))))
(+.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 b (/.f64 x-scale b))))) (.f64 (/.f64 b (/.f64 x-scale b)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (*.f64 a a))))
(+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 4))) (.f64 -1 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2)))))
(+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (+.f64 (/.f64 (.f64 b b) (/.f64 (pow.f64 a 4) (-.f64 (neg.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 b b) x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 b b) x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 a a)))))
(+.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (.f64 -1 (+.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 b (/.f64 x-scale b))))) (.f64 (/.f64 b (/.f64 x-scale b)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (.f64 a a)) (.f64 (/.f64 (.f64 b b) (pow.f64 a 4)) (-.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 b (/.f64 x-scale b))))) (.f64 (/.f64 b (/.f64 x-scale b)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))))))))
(+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 4)) (pow.f64 a 6))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 4))) (.f64 -1 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))) (pow.f64 a 2))))))
(+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 b b) x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (pow.f64 a 6) (pow.f64 b 4))) (.f64 -1 (+.f64 (/.f64 (.f64 b b) (/.f64 (pow.f64 a 4) (-.f64 (neg.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 b b) x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 b b) x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 a a))))))
(+.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (.f64 -1 (+.f64 (+.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 b (/.f64 x-scale b))))) (.f64 (/.f64 b (/.f64 x-scale b)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (.f64 a a)) (.f64 (/.f64 (.f64 b b) (pow.f64 a 4)) (-.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 b (/.f64 x-scale b))))) (.f64 (/.f64 b (/.f64 x-scale b)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))))) (.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 b (/.f64 x-scale b))))) (.f64 (/.f64 b (/.f64 x-scale b)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))) (pow.f64 a 6)) (pow.f64 b 4)))))
(/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))) (pow.f64 a 2))))
(+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 b b) x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 a a))))
(+.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 b (/.f64 x-scale b))))) (.f64 (/.f64 b (/.f64 x-scale b)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (*.f64 a a))))
(+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 4))) (.f64 -1 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 a 2)))))
(+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (+.f64 (/.f64 (.f64 b b) (/.f64 (pow.f64 a 4) (-.f64 (neg.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 b b) x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 b b) x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 a a)))))
(+.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (.f64 -1 (+.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 b (/.f64 x-scale b))))) (.f64 (/.f64 b (/.f64 x-scale b)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (.f64 a a)) (.f64 (/.f64 (.f64 b b) (pow.f64 a 4)) (-.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 b (/.f64 x-scale b))))) (.f64 (/.f64 b (/.f64 x-scale b)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))))))))
(+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 4)) (pow.f64 a 6))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 4))) (.f64 -1 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))) (pow.f64 a 2))))))
(+.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 b b) x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (pow.f64 a 6) (pow.f64 b 4))) (.f64 -1 (+.f64 (/.f64 (.f64 b b) (/.f64 (pow.f64 a 4) (-.f64 (neg.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 b b) x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 b b) x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 a a))))))
(+.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (.f64 -1 (+.f64 (+.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 b (/.f64 x-scale b))))) (.f64 (/.f64 b (/.f64 x-scale b)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (.f64 a a)) (.f64 (/.f64 (.f64 b b) (pow.f64 a 4)) (-.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 b (/.f64 x-scale b))))) (.f64 (/.f64 b (/.f64 x-scale b)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))))) (.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 b (/.f64 x-scale b))))) (.f64 (/.f64 b (/.f64 x-scale b)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))) (pow.f64 a 6)) (pow.f64 b 4)))))
(.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (*.f64 x-scale x-scale)))))) 1)
(.f64 1/2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 1 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (*.f64 x-scale x-scale)))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 (sqrt.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))) (sqrt.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 (sqrt.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (sqrt.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))))))
(.f64 (.f64 (sqrt.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) (sqrt.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))))))) (/.f64 1/2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (*.f64 (/.f64 a x-scale) (/.f64 a x-scale))))))
(.f64 (/.f64 1/2 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale)))) (.f64 (sqrt.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (sqrt.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))))))
(.f64 (cbrt.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))) (.f64 (cbrt.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))) (cbrt.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 (.f64 (cbrt.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))) (cbrt.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))))) (cbrt.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 (.f64 (cbrt.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (cbrt.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (cbrt.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))))
(.f64 (.f64 (cbrt.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) (cbrt.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))))))) (.f64 (/.f64 1/2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale))))) (cbrt.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))))))))
(/.f64 (.f64 (.f64 (cbrt.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (.f64 (cbrt.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (cbrt.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))))) 1/2) (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))))
(.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 (/.f64 1 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))
(.f64 1/2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(pow.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))) 1)
(.f64 1/2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(log.f64 (exp.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(cbrt.f64 (.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))) (.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))) (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))))))
(cbrt.f64 (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (-.f64 (.f64 b b) (.f64 a a))))) 3))
(cbrt.f64 (pow.f64 (.f64 1/2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))))) 3))
(expm1.f64 (log1p.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(exp.f64 (log.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(log1p.f64 (expm1.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 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 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 1/2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 1)
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(.f64 1 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(.f64 (sqrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (sqrt.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(.f64 (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(.f64 (.f64 (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 1)
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(log.f64 (exp.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cbrt.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (pow.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))
(cbrt.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (pow.f64 (cos.f64 (.f64 (*.f64 angle 1/180) (PI.f64))) 2)))
(cbrt.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))
(expm1.f64 (log1p.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(exp.f64 (log.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(log1p.f64 (expm1.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 1)
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(.f64 1 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(.f64 (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (sqrt.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(.f64 (.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 1)
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(log.f64 (exp.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cbrt.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))
(cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (pow.f64 (sin.f64 (.f64 (*.f64 angle 1/180) (PI.f64))) 2)))
(cbrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))
(expm1.f64 (log1p.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(exp.f64 (log.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(log1p.f64 (expm1.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(.f64 x-scale (.f64 -1/2 (/.f64 1 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))))))
(.f64 x-scale (/.f64 -1/2 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (/.f64 (/.f64 (.f64 x-scale -1) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 x-scale (/.f64 -1/2 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (/.f64 (/.f64 (.f64 x-scale -1) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 -1/2 (.f64 x-scale (/.f64 1 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))))))
(.f64 x-scale (/.f64 -1/2 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (/.f64 (/.f64 (.f64 x-scale -1) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (.f64 x-scale -1/2) (/.f64 1 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))))
(.f64 x-scale (/.f64 -1/2 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (/.f64 (/.f64 (.f64 x-scale -1) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) 1)
(.f64 x-scale (/.f64 -1/2 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (/.f64 (/.f64 (.f64 x-scale -1) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 1 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))
(.f64 x-scale (/.f64 -1/2 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (/.f64 (/.f64 (.f64 x-scale -1) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (sqrt.f64 (.f64 x-scale -1/2)) (.f64 (sqrt.f64 (.f64 x-scale -1/2)) (/.f64 1 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))))))
(.f64 (.f64 (sqrt.f64 (.f64 x-scale -1/2)) (sqrt.f64 (.f64 x-scale -1/2))) (/.f64 (/.f64 1 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2)) (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (.f64 (/.f64 1 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale)))) (.f64 (sqrt.f64 (.f64 x-scale -1/2)) (sqrt.f64 (.f64 x-scale -1/2))))
(.f64 (sqrt.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (sqrt.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))
(.f64 x-scale (/.f64 -1/2 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (/.f64 (/.f64 (.f64 x-scale -1) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (.f64 (cbrt.f64 (.f64 x-scale -1/2)) (cbrt.f64 (.f64 x-scale -1/2))) (.f64 (cbrt.f64 (.f64 x-scale -1/2)) (/.f64 1 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))))))
(.f64 (.f64 (.f64 (cbrt.f64 (.f64 x-scale -1/2)) (cbrt.f64 (.f64 x-scale -1/2))) (cbrt.f64 (.f64 x-scale -1/2))) (/.f64 (/.f64 1 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2)) (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (.f64 (/.f64 1 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale)))) (.f64 (cbrt.f64 (.f64 x-scale -1/2)) (.f64 (cbrt.f64 (.f64 x-scale -1/2)) (cbrt.f64 (.f64 x-scale -1/2)))))
(.f64 (cbrt.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 (cbrt.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (cbrt.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))))
(.f64 x-scale (/.f64 -1/2 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (/.f64 (/.f64 (.f64 x-scale -1) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (.f64 (cbrt.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (cbrt.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))) (cbrt.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))
(.f64 x-scale (/.f64 -1/2 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (/.f64 (/.f64 (.f64 x-scale -1) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))))
(.f64 x-scale (/.f64 -1/2 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (/.f64 (/.f64 (.f64 x-scale -1) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (/.f64 1 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))) (.f64 x-scale -1/2))
(.f64 x-scale (/.f64 -1/2 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (/.f64 (/.f64 (.f64 x-scale -1) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (.f64 (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (*.f64 x-scale x-scale)))))
(.f64 x-scale (/.f64 -1/2 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (/.f64 (/.f64 (.f64 x-scale -1) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (.f64 (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))) 2)
(.f64 x-scale (/.f64 -1/2 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (/.f64 (/.f64 (.f64 x-scale -1) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (.f64 (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) 1) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))
(.f64 x-scale (/.f64 -1/2 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (/.f64 (/.f64 (.f64 x-scale -1) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (.f64 (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))))) (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (*.f64 x-scale x-scale)))))))
(.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (/.f64 -1/2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) (.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))))) (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale))))))))
(.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 -1/2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))))) (sqrt.f64 (.f64 2 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale)))))))
(.f64 (.f64 (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (cbrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))) (cbrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))))))) (cbrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (*.f64 x-scale x-scale)))))))
(.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (/.f64 -1/2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))) (.f64 (.f64 (cbrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))))) (cbrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale))))))) (cbrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (*.f64 (/.f64 a x-scale) (/.f64 a x-scale))))))))
(.f64 (.f64 (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 -1/2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (.f64 (cbrt.f64 (.f64 2 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))))) (.f64 (cbrt.f64 (.f64 2 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))))) (cbrt.f64 (.f64 2 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))))))))
(pow.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))) 1)
(.f64 x-scale (/.f64 -1/2 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (/.f64 (/.f64 (.f64 x-scale -1) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(log.f64 (exp.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))
(.f64 x-scale (/.f64 -1/2 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (/.f64 (/.f64 (.f64 x-scale -1) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(cbrt.f64 (.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))))
(cbrt.f64 (pow.f64 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (.f64 2 (.f64 (/.f64 x-scale (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (/.f64 -1/2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (*.f64 angle 1/180) (PI.f64)))))))) 3))
(cbrt.f64 (pow.f64 (.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (/.f64 (/.f64 (.f64 x-scale -1) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) 3))
(expm1.f64 (log1p.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))
(.f64 x-scale (/.f64 -1/2 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (/.f64 (/.f64 (.f64 x-scale -1) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(exp.f64 (log.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))
(.f64 x-scale (/.f64 -1/2 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (/.f64 (/.f64 (.f64 x-scale -1) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(log1p.f64 (expm1.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale -1/2) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))
(.f64 x-scale (/.f64 -1/2 (.f64 (/.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (/.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 x-scale b) (/.f64 x-scale b))) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a x-scale) (/.f64 a x-scale)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (/.f64 (/.f64 (.f64 x-scale -1) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))

localize245.0ms (0.2%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	63.3%	(.f64 (.f64 -1/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 y-scale x-scale))
✓	62.0%	(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
✓	61.5%	(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
✓	57.9%	(/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))

Compiler

Compiled 626 to 291 computations (53.5% saved)

series53.0ms (0%)

Counts

4 → 116

Calls

33 calls:

Time	Variable		Point	Expression
7.0ms	angle	@	0	(/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
7.0ms	angle	@	0	(.f64 (.f64 -1/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 y-scale x-scale))
7.0ms	y-scale	@	0	(.f64 (.f64 -1/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 y-scale x-scale))
2.0ms	angle	@	inf	(.f64 (.f64 -1/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 y-scale x-scale))
2.0ms	angle	@	-inf	(.f64 (.f64 -1/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 y-scale x-scale))

rewrite105.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

758×	`add-sqr-sqrt`
744×	`*-un-lft-identity`
740×	`pow1`
696×	`add-exp-log`
696×	`add-log-exp`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	35	462
1	747	462

Stop Event

1×	node limit

Counts

4 → 47

Calls

Call 1

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

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

simplify625.0ms (0.4%)

Algorithm

1×	egg-herbie

Rules

1622×	`associate-r`
1272×	`associate-/r*`
1058×	`associate-l`
982×	`*-commutative`
956×	`associate-/l*`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	555	37933
1	1845	37133

Stop Event

1×	node limit

Counts

163 → 212

Calls

Call 1

Inputs
(.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(+.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2)) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2)) (+.f64 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 4)) (pow.f64 a 2)) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 6)) (pow.f64 a 4)) (+.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2)) (+.f64 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 4)) (pow.f64 a 2)) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(-.f64 (+.f64 (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(-.f64 (+.f64 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)) (pow.f64 b 4)) (+.f64 (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(-.f64 (+.f64 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)) (pow.f64 b 4)) (+.f64 (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 4)) (pow.f64 b 6))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(-.f64 (+.f64 (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(-.f64 (+.f64 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)) (pow.f64 b 4)) (+.f64 (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(-.f64 (+.f64 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)) (pow.f64 b 4)) (+.f64 (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 4)) (pow.f64 b 6))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(.f64 360 (/.f64 (pow.f64 b 2) (.f64 (pow.f64 x-scale 2) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))
(+.f64 (.f64 angle (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 64800 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))))) (.f64 360 (/.f64 (pow.f64 b 2) (.f64 (pow.f64 x-scale 2) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))
(+.f64 (.f64 (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 2 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (.f64 -1/1574640000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (+.f64 (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 64800 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64))) (.f64 64800 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))))) (pow.f64 angle 3)) (+.f64 (.f64 angle (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 64800 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))))) (.f64 360 (/.f64 (pow.f64 b 2) (.f64 (pow.f64 x-scale 2) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))))
(+.f64 (.f64 (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 2 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (.f64 -1/1574640000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (+.f64 (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 64800 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64))) (.f64 64800 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))))) (pow.f64 angle 3)) (+.f64 (.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6))))) (.f64 2 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (+.f64 (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 -1/881596846080000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 -1/1469328076800000000 (pow.f64 (PI.f64) 7)) (.f64 -1/30855889612800000000 (pow.f64 (PI.f64) 7))))) (pow.f64 b 2)) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))) (+.f64 (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 2 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (.f64 -1/1574640000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (+.f64 (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 64800 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64))) (.f64 64800 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64))) (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 64800 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (PI.f64))))))) (+.f64 (.f64 angle (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 64800 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))))) (.f64 360 (/.f64 (pow.f64 b 2) (.f64 (pow.f64 x-scale 2) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(+.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 2)) (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 2)) (+.f64 (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 4)) (pow.f64 b 2))))
(+.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 2)) (+.f64 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 6)) (pow.f64 b 4)) (+.f64 (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))) (pow.f64 a 4)) (pow.f64 b 2)))))
(.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(-.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 4)) (+.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 4)) (+.f64 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 4)) (pow.f64 a 6)) (+.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(-.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 4)) (+.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 4)) (+.f64 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 4)) (pow.f64 a 6)) (+.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
1
(+.f64 1 (.f64 -1/64800 (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))
(+.f64 1 (+.f64 (.f64 1/25194240000 (.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (.f64 -1/64800 (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2)))))
(+.f64 (.f64 -1/24488801280000000 (.f64 (pow.f64 angle 6) (pow.f64 (PI.f64) 6))) (+.f64 1 (+.f64 (.f64 1/25194240000 (.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (.f64 -1/64800 (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))))
(.f64 1/180 (.f64 angle (PI.f64)))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (.f64 1/180 (.f64 angle (PI.f64))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (+.f64 (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5))) (.f64 -1/30855889612800000000 (.f64 (pow.f64 angle 7) (pow.f64 (PI.f64) 7))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(+.f64 (.f64 -1/2 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2))) (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 4)) (pow.f64 a 2))) (+.f64 (.f64 -1/2 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2))) (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 4)) (pow.f64 a 2))) (+.f64 (.f64 -1/2 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 6)) (pow.f64 a 4))) (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 4)))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 4) (-.f64 (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 6))) (+.f64 (.f64 -1/2 (/.f64 (-.f64 (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 4))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 4)))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 4) (-.f64 (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 6))) (+.f64 (.f64 -1/2 (/.f64 (-.f64 (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 4))))))
(.f64 -180 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))
(+.f64 (.f64 -1/2 (.f64 angle (-.f64 (.f64 180 (/.f64 (.f64 y-scale (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 64800 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))))) (.f64 -180 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))
(+.f64 (.f64 -1/2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (.f64 -1/1574640000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (+.f64 (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (.f64 y-scale (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 64800 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64))) (.f64 64800 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))))))) (+.f64 (.f64 -1/2 (.f64 angle (-.f64 (.f64 180 (/.f64 (.f64 y-scale (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 64800 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))))) (.f64 -180 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))))
(+.f64 (.f64 -1/2 (.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6))))) (.f64 2 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6))))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (+.f64 (.f64 64800 (/.f64 (.f64 y-scale (.f64 (+.f64 (.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 -1/881596846080000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 -1/1469328076800000000 (pow.f64 (PI.f64) 7)) (.f64 -1/30855889612800000000 (pow.f64 (PI.f64) 7))))) (pow.f64 b 2))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))) (+.f64 (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (.f64 y-scale (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 64800 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (PI.f64))) (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))) (-.f64 (.f64 180 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (.f64 -1/1574640000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (+.f64 (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (.f64 y-scale (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 64800 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64))) (.f64 64800 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))))) (PI.f64)))))))) (+.f64 (.f64 -1/2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (.f64 -1/1574640000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (+.f64 (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (.f64 y-scale (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 64800 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64))) (.f64 64800 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))))))) (+.f64 (.f64 -1/2 (.f64 angle (-.f64 (.f64 180 (/.f64 (.f64 y-scale (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 64800 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))))) (.f64 -180 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 -1/2 (.f64 (pow.f64 a 2) (-.f64 (.f64 2 (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 -1/2 (.f64 (pow.f64 a 2) (-.f64 (.f64 2 (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 4) (-.f64 (.f64 2 (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 b 2))) (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (.f64 -1/2 (.f64 (pow.f64 a 2) (-.f64 (.f64 2 (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 4) (-.f64 (.f64 2 (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 b 2))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 6) (-.f64 (.f64 2 (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 b 4))) (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2))) (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2)) (pow.f64 a 4))) (+.f64 (.f64 -1/2 (/.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2))) (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2)) (pow.f64 a 4))) (+.f64 (.f64 -1/2 (/.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 4)) (pow.f64 a 6))) (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2))) (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2)) (pow.f64 a 4))) (+.f64 (.f64 -1/2 (/.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2))) (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2)) (pow.f64 a 4))) (+.f64 (.f64 -1/2 (/.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 4)) (pow.f64 a 6))) (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (/.f64 1 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (*.f64 x-scale (+.f64 b a)) (-.f64 b a)))))))
(.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (*.f64 x-scale (+.f64 b a)) (-.f64 b a)))))) 1)
(.f64 1 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (*.f64 x-scale (+.f64 b a)) (-.f64 b a)))))))
(.f64 (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (/.f64 1 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (*.f64 x-scale (+.f64 b a)) (-.f64 b a))))))))
(.f64 (sqrt.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a))))))) (sqrt.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (*.f64 x-scale (+.f64 b a)) (-.f64 b a))))))))
(.f64 (cbrt.f64 (.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (cbrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (/.f64 1 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (*.f64 x-scale (+.f64 b a)) (-.f64 b a))))))))
(.f64 (cbrt.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a))))))) (cbrt.f64 (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))))) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))))))))
(.f64 (cbrt.f64 (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))))) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))))))) (cbrt.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a))))))))
(.f64 (/.f64 1 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(.f64 (/.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))) (+.f64 (sin.f64 (.f64 (.f64 angle (PI.f64)) 0)) (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90)))) 2)
(pow.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))))) 1)
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (.f64 x-scale x-scale) (neg.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(log.f64 (exp.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a))))))))
(cbrt.f64 (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))))) (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))))) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))))))))
(expm1.f64 (log1p.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a))))))))
(exp.f64 (log.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a))))))))
(log1p.f64 (expm1.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a))))))))
(.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)))
(pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 1)
(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 (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 1/180 (.f64 angle (PI.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)
(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 (.f64 x-scale y-scale) (.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) -1/2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (*.f64 x-scale (+.f64 b a)) (-.f64 b a))))))
(/.f64 (.f64 (.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) -1/2) (.f64 x-scale y-scale)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (*.f64 x-scale (+.f64 b a)) (-.f64 b a))))))
(pow.f64 (.f64 x-scale (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))))) (*.f64 -1/2 y-scale))) 1)
(log.f64 (exp.f64 (.f64 x-scale (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))))) (*.f64 -1/2 y-scale)))))
(cbrt.f64 (.f64 (.f64 x-scale (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))))) (.f64 -1/2 y-scale))) (.f64 (.f64 (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))))) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a))))))) 1/4) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))
(expm1.f64 (log1p.f64 (.f64 x-scale (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))))) (*.f64 -1/2 y-scale)))))
(exp.f64 (log.f64 (.f64 x-scale (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))))) (*.f64 -1/2 y-scale)))))
(log1p.f64 (expm1.f64 (.f64 x-scale (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))))) (*.f64 -1/2 y-scale)))))

Outputs
(.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(/.f64 -2 (/.f64 (.f64 x-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(+.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2)) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(fma.f64 (-.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)))))) (.f64 b b) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(fma.f64 (.f64 -2 (+.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 (.f64 x-scale a) a)))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale a) a)))))) (.f64 b b) (/.f64 -2 (/.f64 (.f64 x-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(+.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2)) (+.f64 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 4)) (pow.f64 a 2)) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(fma.f64 (-.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)))))) (.f64 b b) (+.f64 (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (-.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)))))) (/.f64 (*.f64 a a) (pow.f64 b 4)))))
(+.f64 (fma.f64 (.f64 -2 (+.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 (.f64 x-scale a) a)))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale a) a)))))) (.f64 b b) (/.f64 -2 (/.f64 (.f64 x-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (/.f64 (.f64 -2 (+.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 (.f64 x-scale a) a)))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale a) a)))))) (/.f64 a (/.f64 (pow.f64 b 4) a))))
(+.f64 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 6)) (pow.f64 a 4)) (+.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2)) (+.f64 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 4)) (pow.f64 a 2)) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(+.f64 (fma.f64 (-.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)))))) (.f64 b b) (+.f64 (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (-.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)))))) (/.f64 (.f64 a a) (pow.f64 b 4))))) (/.f64 (-.f64 (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 a a)))))) (/.f64 (pow.f64 a 4) (pow.f64 b 6))))
(+.f64 (+.f64 (fma.f64 (.f64 -2 (+.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 (.f64 x-scale a) a)))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale a) a)))))) (.f64 b b) (/.f64 -2 (/.f64 (.f64 x-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (/.f64 (.f64 -2 (+.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 (.f64 x-scale a) a)))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale a) a)))))) (/.f64 a (/.f64 (pow.f64 b 4) a)))) (.f64 (/.f64 (.f64 -2 (+.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 (.f64 x-scale a) a)))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale a) a)))))) (pow.f64 a 4)) (pow.f64 b 6)))
(.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))
(/.f64 (.f64 2 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (*.f64 x-scale x-scale)))
(-.f64 (+.f64 (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (.f64 2 (+.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))) (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 2 (+.f64 (+.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale))) (.f64 (/.f64 (.f64 a a) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 x-scale (.f64 b b))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (/.f64 (.f64 a a) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 x-scale (.f64 b b))))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(-.f64 (+.f64 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)) (pow.f64 b 4)) (+.f64 (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (/.f64 (+.f64 (.f64 2 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (pow.f64 b 4) (.f64 a a))) (+.f64 (.f64 2 (+.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))) (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (.f64 2 (+.f64 (+.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale))) (.f64 (/.f64 (.f64 a a) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 x-scale (.f64 b b))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (/.f64 (.f64 a a) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 x-scale (.f64 b b))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 (/.f64 (.f64 2 (+.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (pow.f64 b 4)) (.f64 a a)))
(-.f64 (+.f64 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)) (pow.f64 b 4)) (+.f64 (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 4)) (pow.f64 b 6))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (/.f64 (+.f64 (.f64 2 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (pow.f64 b 4) (.f64 a a))) (-.f64 (fma.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))) (fma.f64 2 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (+.f64 (.f64 2 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (pow.f64 b 6) (pow.f64 a 4))))) (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (.f64 (/.f64 (.f64 2 (+.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (pow.f64 b 4)) (.f64 a a)) (-.f64 (fma.f64 2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (/.f64 (.f64 a a) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 x-scale (.f64 b b))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 (.f64 2 (+.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (pow.f64 b 6)) (pow.f64 a 4)))) (/.f64 (.f64 -2 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 x-scale (.f64 b b)))))))
(.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))
(/.f64 (.f64 2 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (*.f64 x-scale x-scale)))
(-.f64 (+.f64 (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (.f64 2 (+.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))) (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 2 (+.f64 (+.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale))) (.f64 (/.f64 (.f64 a a) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 x-scale (.f64 b b))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (/.f64 (.f64 a a) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 x-scale (.f64 b b))))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(-.f64 (+.f64 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)) (pow.f64 b 4)) (+.f64 (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (/.f64 (+.f64 (.f64 2 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (pow.f64 b 4) (.f64 a a))) (+.f64 (.f64 2 (+.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))) (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (.f64 2 (+.f64 (+.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale))) (.f64 (/.f64 (.f64 a a) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 x-scale (.f64 b b))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (/.f64 (.f64 a a) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 x-scale (.f64 b b))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 (/.f64 (.f64 2 (+.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (pow.f64 b 4)) (.f64 a a)))
(-.f64 (+.f64 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)) (pow.f64 b 4)) (+.f64 (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 4)) (pow.f64 b 6))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (/.f64 (+.f64 (.f64 2 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (pow.f64 b 4) (.f64 a a))) (-.f64 (fma.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))) (fma.f64 2 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (+.f64 (.f64 2 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (pow.f64 b 6) (pow.f64 a 4))))) (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (.f64 (/.f64 (.f64 2 (+.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (pow.f64 b 4)) (.f64 a a)) (-.f64 (fma.f64 2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (/.f64 (.f64 a a) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 x-scale (.f64 b b))))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 (.f64 2 (+.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (pow.f64 b 6)) (pow.f64 a 4)))) (/.f64 (.f64 -2 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 x-scale (.f64 b b)))))))
(.f64 360 (/.f64 (pow.f64 b 2) (.f64 (pow.f64 x-scale 2) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))
(.f64 360 (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))
(/.f64 (.f64 (.f64 b b) 360) (.f64 angle (.f64 (PI.f64) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))))
(+.f64 (.f64 angle (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 64800 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))))) (.f64 360 (/.f64 (pow.f64 b 2) (.f64 (pow.f64 x-scale 2) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))
(fma.f64 angle (+.f64 (.f64 180 (/.f64 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/16200 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -64800 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))))) (.f64 360 (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))
(fma.f64 angle (fma.f64 180 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 b b) -1/16200))) (.f64 (PI.f64) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 3) (.f64 -1/8748000 (.f64 b b))) (.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) -64800)) (/.f64 (.f64 (.f64 b b) 360) (.f64 angle (.f64 (PI.f64) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (*.f64 a a)))))))
(+.f64 (.f64 (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 2 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (.f64 -1/1574640000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (+.f64 (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 64800 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64))) (.f64 64800 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))))) (pow.f64 angle 3)) (+.f64 (.f64 angle (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 64800 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))))) (.f64 360 (/.f64 (pow.f64 b 2) (.f64 (pow.f64 x-scale 2) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))))
(fma.f64 (-.f64 (.f64 180 (/.f64 (fma.f64 2 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (.f64 -1/1574640000 (.f64 (.f64 a a) (pow.f64 (PI.f64) 4)))) (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 180 (/.f64 (+.f64 (.f64 180 (/.f64 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/16200 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -64800 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))))) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))) (.f64 64800 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2))) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000))))))) (pow.f64 angle 3) (fma.f64 angle (+.f64 (.f64 180 (/.f64 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/16200 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -64800 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))))) (.f64 360 (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))))
(fma.f64 (-.f64 (.f64 180 (-.f64 (/.f64 (fma.f64 2 (.f64 (pow.f64 (PI.f64) 4) (.f64 1/3149280000 (.f64 b b))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 4) -1/1574640000))) (.f64 (PI.f64) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (/.f64 (fma.f64 180 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 b b) -1/16200))) (.f64 (PI.f64) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 3) (.f64 -1/8748000 (.f64 b b))) (.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) -64800)) (PI.f64)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)))) (.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 5) 1/1417176000000) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2))) 64800))) (pow.f64 angle 3) (fma.f64 angle (fma.f64 180 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 b b) -1/16200))) (.f64 (PI.f64) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 3) (.f64 -1/8748000 (.f64 b b))) (.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) -64800)) (/.f64 (.f64 (.f64 b b) 360) (.f64 angle (.f64 (PI.f64) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (*.f64 a a))))))))
(+.f64 (.f64 (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 2 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (.f64 -1/1574640000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (+.f64 (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 64800 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64))) (.f64 64800 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))))) (pow.f64 angle 3)) (+.f64 (.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6))))) (.f64 2 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6)))))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (+.f64 (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 -1/881596846080000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 -1/1469328076800000000 (pow.f64 (PI.f64) 7)) (.f64 -1/30855889612800000000 (pow.f64 (PI.f64) 7))))) (pow.f64 b 2)) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))) (+.f64 (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 2 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (.f64 -1/1574640000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (+.f64 (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 64800 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64))) (.f64 64800 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64))) (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 64800 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (PI.f64))))))) (+.f64 (.f64 angle (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 64800 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))))) (.f64 360 (/.f64 (pow.f64 b 2) (.f64 (pow.f64 x-scale 2) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))))
(fma.f64 (-.f64 (.f64 180 (/.f64 (fma.f64 2 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (.f64 -1/1574640000 (.f64 (.f64 a a) (pow.f64 (PI.f64) 4)))) (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 180 (/.f64 (+.f64 (.f64 180 (/.f64 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/16200 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -64800 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))))) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))) (.f64 64800 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2))) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000))))))) (pow.f64 angle 3) (fma.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)))) (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 64800 (/.f64 (fma.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7) (fma.f64 -1/881596846080000000 (pow.f64 (PI.f64) 7) (.f64 (pow.f64 (PI.f64) 7) -11/15427944806400000000))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2))) (.f64 b b))) (.f64 180 (+.f64 (/.f64 (-.f64 (.f64 180 (/.f64 (fma.f64 2 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (.f64 -1/1574640000 (.f64 (.f64 a a) (pow.f64 (PI.f64) 4)))) (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 180 (/.f64 (+.f64 (.f64 180 (/.f64 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/16200 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -64800 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))))) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))) (.f64 64800 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2))) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000))))))) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))) (/.f64 (+.f64 (.f64 180 (/.f64 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/16200 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -64800 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))))) (/.f64 (PI.f64) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000)))))))) (fma.f64 angle (+.f64 (.f64 180 (/.f64 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/16200 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -64800 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))))) (.f64 360 (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))))
(fma.f64 (-.f64 (.f64 180 (-.f64 (/.f64 (fma.f64 2 (.f64 (pow.f64 (PI.f64) 4) (.f64 1/3149280000 (.f64 b b))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 4) -1/1574640000))) (.f64 (PI.f64) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (/.f64 (fma.f64 180 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 b b) -1/16200))) (.f64 (PI.f64) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 3) (.f64 -1/8748000 (.f64 b b))) (.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) -64800)) (PI.f64)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)))) (.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 5) 1/1417176000000) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2))) 64800))) (pow.f64 angle 3) (fma.f64 (pow.f64 angle 5) (-.f64 (/.f64 (.f64 360 (+.f64 (.f64 (pow.f64 (PI.f64) 6) (.f64 1/765275040000000 (.f64 a a))) (.f64 b (.f64 b (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))) (.f64 (PI.f64) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 64800 (.f64 (/.f64 (fma.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7) (.f64 (pow.f64 (PI.f64) 7) -19/10285296537600000000)) (.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 b b)) (.f64 180 (+.f64 (/.f64 (-.f64 (.f64 180 (-.f64 (/.f64 (fma.f64 2 (.f64 (pow.f64 (PI.f64) 4) (.f64 1/3149280000 (.f64 b b))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 4) -1/1574640000))) (.f64 (PI.f64) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (/.f64 (fma.f64 180 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 b b) -1/16200))) (.f64 (PI.f64) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 3) (.f64 -1/8748000 (.f64 b b))) (.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) -64800)) (PI.f64)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)))) (.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 5) 1/1417176000000) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2))) 64800))) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))) (.f64 (/.f64 (fma.f64 180 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 b b) -1/16200))) (.f64 (PI.f64) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 3) (.f64 -1/8748000 (.f64 b b))) (.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) -64800)) (PI.f64)) (.f64 (pow.f64 (PI.f64) 5) 1/1417176000000)))))) (fma.f64 angle (fma.f64 180 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 b b) -1/16200))) (.f64 (PI.f64) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 3) (.f64 -1/8748000 (.f64 b b))) (.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) -64800)) (/.f64 (.f64 (.f64 b b) 360) (.f64 angle (.f64 (PI.f64) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a)))))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 2 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 2 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 2 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 2 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 2 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 2 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 2 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 2 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))
(/.f64 (.f64 2 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (*.f64 x-scale x-scale)))
(+.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 2)) (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(fma.f64 (+.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 a a) (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)))))
(fma.f64 (.f64 2 (+.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 x-scale (.f64 b b))))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 x-scale (.f64 b b))))))) (.f64 a a) (/.f64 (.f64 2 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (*.f64 x-scale x-scale))))
(+.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 2)) (+.f64 (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 4)) (pow.f64 b 2))))
(fma.f64 (+.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 a a) (fma.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))) (/.f64 (+.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 b b) (pow.f64 a 4)))))
(fma.f64 (.f64 2 (+.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 x-scale (.f64 b b))))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 x-scale (.f64 b b))))))) (.f64 a a) (fma.f64 2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale))) (.f64 (/.f64 (.f64 2 (+.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 x-scale (.f64 b b))))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 x-scale (.f64 b b))))))) (*.f64 b b)) (pow.f64 a 4))))
(+.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 2)) (+.f64 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 6)) (pow.f64 b 4)) (+.f64 (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))) (pow.f64 a 4)) (pow.f64 b 2)))))
(fma.f64 (+.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 a a) (+.f64 (fma.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))) (/.f64 (+.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 b b) (pow.f64 a 4)))) (/.f64 (+.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (.f64 x-scale x-scale) (.f64 b b)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (pow.f64 b 4) (pow.f64 a 6)))))
(+.f64 (fma.f64 (.f64 2 (+.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 x-scale (.f64 b b))))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 x-scale (.f64 b b))))))) (.f64 a a) (fma.f64 2 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale))) (.f64 (/.f64 (.f64 2 (+.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 x-scale (.f64 b b))))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 x-scale (.f64 b b))))))) (.f64 b b)) (pow.f64 a 4)))) (.f64 (/.f64 (.f64 2 (+.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 x-scale (.f64 b b))))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 x-scale (*.f64 b b))))))) (pow.f64 b 4)) (pow.f64 a 6)))
(.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(/.f64 -2 (/.f64 (.f64 x-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(-.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (.f64 -2 (+.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))))
(.f64 -2 (+.f64 (+.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a))) (.f64 (/.f64 (.f64 b b) (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale a) a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 4)) (+.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (+.f64 (.f64 -2 (+.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 -2 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 4))) (.f64 -2 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))))
(+.f64 (.f64 -2 (+.f64 (+.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a))) (.f64 (/.f64 (.f64 b b) (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale a) a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 (/.f64 (.f64 b b) (pow.f64 a 4)) (.f64 -2 (+.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 4)) (+.f64 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 4)) (pow.f64 a 6)) (+.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 -2 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 4)) (/.f64 (+.f64 (.f64 -2 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (pow.f64 a 6) (pow.f64 b 4)))) (.f64 -2 (+.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -2 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))))
(+.f64 (.f64 (/.f64 (.f64 b b) (pow.f64 a 4)) (.f64 -2 (+.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))) (+.f64 (/.f64 (pow.f64 b 4) (/.f64 (pow.f64 a 6) (.f64 -2 (+.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))) (.f64 -2 (+.f64 (+.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a))) (.f64 (/.f64 (.f64 b b) (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale a) a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))
(.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(/.f64 -2 (/.f64 (.f64 x-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(-.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (.f64 -2 (+.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))))
(.f64 -2 (+.f64 (+.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a))) (.f64 (/.f64 (.f64 b b) (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale a) a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 4)) (+.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (+.f64 (.f64 -2 (+.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 -2 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 4))) (.f64 -2 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))))
(+.f64 (.f64 -2 (+.f64 (+.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a))) (.f64 (/.f64 (.f64 b b) (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale a) a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 (/.f64 (.f64 b b) (pow.f64 a 4)) (.f64 -2 (+.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 4)) (+.f64 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 4)) (pow.f64 a 6)) (+.f64 (.f64 -2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 x-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 -2 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 4)) (/.f64 (+.f64 (.f64 -2 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (.f64 b b) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (pow.f64 a 6) (pow.f64 b 4)))) (.f64 -2 (+.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (.f64 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)))) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -2 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))))
(+.f64 (.f64 (/.f64 (.f64 b b) (pow.f64 a 4)) (.f64 -2 (+.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))) (+.f64 (/.f64 (pow.f64 b 4) (/.f64 (pow.f64 a 6) (.f64 -2 (+.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))) (.f64 -2 (+.f64 (+.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a))) (.f64 (/.f64 (.f64 b b) (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale a) a)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 2 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 2 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 2 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 2 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 2 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 2 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 2 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 2 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 2 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 2 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 2 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 2 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
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 (pow.f64 (PI.f64) 2) (.f64 -1/64800 (*.f64 angle angle))))
(+.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 (PI.f64) 4) (pow.f64 angle 4)) (.f64 (.f64 -1/64800 (.f64 angle angle)) (pow.f64 (PI.f64) 2))))
(+.f64 1 (fma.f64 1/25194240000 (.f64 (pow.f64 (PI.f64) 4) (pow.f64 angle 4)) (.f64 (pow.f64 (PI.f64) 2) (.f64 -1/64800 (.f64 angle angle)))))
(+.f64 (.f64 -1/24488801280000000 (.f64 (pow.f64 angle 6) (pow.f64 (PI.f64) 6))) (+.f64 1 (+.f64 (.f64 1/25194240000 (.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (.f64 -1/64800 (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))))
(fma.f64 -1/24488801280000000 (.f64 (pow.f64 (PI.f64) 6) (pow.f64 angle 6)) (+.f64 1 (fma.f64 1/25194240000 (.f64 (pow.f64 (PI.f64) 4) (pow.f64 angle 4)) (.f64 (.f64 -1/64800 (*.f64 angle angle)) (pow.f64 (PI.f64) 2)))))
(fma.f64 -1/24488801280000000 (.f64 (pow.f64 (PI.f64) 6) (pow.f64 angle 6)) (+.f64 1 (fma.f64 1/25194240000 (.f64 (pow.f64 (PI.f64) 4) (pow.f64 angle 4)) (.f64 (pow.f64 (PI.f64) 2) (.f64 -1/64800 (*.f64 angle angle))))))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 1/180 angle))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (.f64 1/180 (.f64 angle (PI.f64))))
(fma.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)) (.f64 1/180 (*.f64 angle (PI.f64))))
(fma.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)) (.f64 (PI.f64) (*.f64 1/180 angle)))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)))))
(fma.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)) (fma.f64 1/180 (.f64 angle (PI.f64)) (.f64 (.f64 1/22674816000000 (pow.f64 angle 5)) (pow.f64 (PI.f64) 5))))
(fma.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)) (fma.f64 1/180 (.f64 angle (PI.f64)) (.f64 (pow.f64 (PI.f64) 5) (.f64 1/22674816000000 (pow.f64 angle 5)))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (+.f64 (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5))) (.f64 -1/30855889612800000000 (.f64 (pow.f64 angle 7) (pow.f64 (PI.f64) 7))))))
(fma.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)) (fma.f64 1/180 (.f64 angle (PI.f64)) (fma.f64 1/22674816000000 (.f64 (pow.f64 (PI.f64) 5) (pow.f64 angle 5)) (.f64 -1/30855889612800000000 (*.f64 (pow.f64 (PI.f64) 7) (pow.f64 angle 7))))))
(fma.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)) (fma.f64 1/180 (.f64 angle (PI.f64)) (fma.f64 1/22674816000000 (.f64 (pow.f64 (PI.f64) 5) (pow.f64 angle 5)) (.f64 (pow.f64 (PI.f64) 7) (*.f64 -1/30855889612800000000 (pow.f64 angle 7))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(+.f64 (.f64 -1/2 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2))) (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(fma.f64 -1/2 (.f64 (.f64 b b) (+.f64 (.f64 -2 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))) (.f64 -2 (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))))) (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(fma.f64 -1/2 (.f64 (.f64 b b) (.f64 -2 (+.f64 (/.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 a a)) (.f64 (/.f64 y-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale a) a))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 4)) (pow.f64 a 2))) (+.f64 (.f64 -1/2 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2))) (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(fma.f64 -1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))) (.f64 -2 (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)))))) (/.f64 (.f64 a a) (pow.f64 b 4))) (fma.f64 -1/2 (.f64 (.f64 b b) (+.f64 (.f64 -2 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))) (.f64 -2 (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))))) (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(fma.f64 -1/2 (/.f64 (.f64 -2 (+.f64 (/.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 a a)) (.f64 (/.f64 y-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale a) a))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 a (/.f64 (pow.f64 b 4) a))) (fma.f64 -1/2 (.f64 (.f64 b b) (.f64 -2 (+.f64 (/.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 a a)) (.f64 (/.f64 y-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale a) a))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 4)) (pow.f64 a 2))) (+.f64 (.f64 -1/2 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 2))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 6)) (pow.f64 a 4))) (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(fma.f64 -1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))) (.f64 -2 (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)))))) (/.f64 (.f64 a a) (pow.f64 b 4))) (fma.f64 -1/2 (.f64 (.f64 b b) (+.f64 (.f64 -2 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))) (.f64 -2 (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))))) (fma.f64 -1/2 (/.f64 (+.f64 (.f64 -2 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a))))) (.f64 -2 (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)))))) (/.f64 (pow.f64 a 4) (pow.f64 b 6))) (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 -1/2 (/.f64 (.f64 -2 (+.f64 (/.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 a a)) (.f64 (/.f64 y-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale a) a))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 a (/.f64 (pow.f64 b 4) a))) (fma.f64 -1/2 (.f64 (.f64 b b) (.f64 -2 (+.f64 (/.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 a a)) (.f64 (/.f64 y-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale a) a))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (fma.f64 -1/2 (.f64 (/.f64 (.f64 -2 (+.f64 (/.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 a a)) (.f64 (/.f64 y-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale a) a))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (pow.f64 a 4)) (pow.f64 b 6)) (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(neg.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 (/.f64 y-scale x-scale) (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(fma.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) y-scale) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 b b)) (neg.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(fma.f64 -1/2 (/.f64 (.f64 2 (+.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)))) (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (/.f64 x-scale y-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 b b)) (.f64 (/.f64 y-scale x-scale) (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 4)))))
(fma.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) y-scale) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 b b)) (fma.f64 -1 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1/2 (/.f64 (.f64 (.f64 a a) (+.f64 (.f64 2 (/.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) y-scale) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))) (pow.f64 b 4)))))
(fma.f64 -1/2 (/.f64 (.f64 2 (+.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)))) (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (/.f64 x-scale y-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 b b)) (fma.f64 -1 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 -1/2 (.f64 (/.f64 a (/.f64 (pow.f64 b 4) a)) (.f64 2 (+.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)))) (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (/.f64 x-scale y-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 4) (-.f64 (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 6))) (+.f64 (.f64 -1/2 (/.f64 (-.f64 (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 4))))))
(fma.f64 -1/2 (/.f64 (pow.f64 a 4) (/.f64 (pow.f64 b 6) (+.f64 (.f64 2 (/.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) y-scale) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (fma.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) y-scale) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 b b)) (fma.f64 -1 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1/2 (/.f64 (.f64 (.f64 a a) (+.f64 (.f64 2 (/.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) y-scale) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 4))))))
(fma.f64 -1/2 (.f64 (/.f64 (pow.f64 a 4) (pow.f64 b 6)) (.f64 2 (+.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)))) (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (/.f64 x-scale y-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (fma.f64 -1/2 (/.f64 (.f64 2 (+.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)))) (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (/.f64 x-scale y-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 b b)) (fma.f64 -1 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 -1/2 (.f64 (/.f64 a (/.f64 (pow.f64 b 4) a)) (.f64 2 (+.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)))) (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (/.f64 x-scale y-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(neg.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 (/.f64 y-scale x-scale) (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(fma.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) y-scale) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 b b)) (neg.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(fma.f64 -1/2 (/.f64 (.f64 2 (+.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)))) (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (/.f64 x-scale y-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 b b)) (.f64 (/.f64 y-scale x-scale) (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 4)))))
(fma.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) y-scale) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 b b)) (fma.f64 -1 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1/2 (/.f64 (.f64 (.f64 a a) (+.f64 (.f64 2 (/.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) y-scale) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))) (pow.f64 b 4)))))
(fma.f64 -1/2 (/.f64 (.f64 2 (+.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)))) (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (/.f64 x-scale y-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 b b)) (fma.f64 -1 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 -1/2 (.f64 (/.f64 a (/.f64 (pow.f64 b 4) a)) (.f64 2 (+.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)))) (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (/.f64 x-scale y-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 4) (-.f64 (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 6))) (+.f64 (.f64 -1/2 (/.f64 (-.f64 (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 2) (-.f64 (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 4))))))
(fma.f64 -1/2 (/.f64 (pow.f64 a 4) (/.f64 (pow.f64 b 6) (+.f64 (.f64 2 (/.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) y-scale) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (fma.f64 -1/2 (/.f64 (+.f64 (.f64 2 (/.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) y-scale) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 b b)) (fma.f64 -1 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1/2 (/.f64 (.f64 (.f64 a a) (+.f64 (.f64 2 (/.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) y-scale) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 a a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 b 4))))))
(fma.f64 -1/2 (.f64 (/.f64 (pow.f64 a 4) (pow.f64 b 6)) (.f64 2 (+.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)))) (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (/.f64 x-scale y-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (fma.f64 -1/2 (/.f64 (.f64 2 (+.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)))) (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (/.f64 x-scale y-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 b b)) (fma.f64 -1 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 -1/2 (.f64 (/.f64 a (/.f64 (pow.f64 b 4) a)) (.f64 2 (+.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)))) (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (/.f64 x-scale y-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))))))
(.f64 -180 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))
(.f64 -180 (/.f64 y-scale (/.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (*.f64 b b))))
(/.f64 -180 (/.f64 (.f64 (.f64 (.f64 angle x-scale) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 b (*.f64 b y-scale))))
(+.f64 (.f64 -1/2 (.f64 angle (-.f64 (.f64 180 (/.f64 (.f64 y-scale (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 64800 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))))) (.f64 -180 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))
(fma.f64 -1/2 (.f64 angle (+.f64 (.f64 180 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/16200 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -64800 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2))))))) (.f64 -180 (/.f64 y-scale (/.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 b b)))))
(fma.f64 -1/2 (.f64 angle (fma.f64 180 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 b b) -1/16200))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (pow.f64 (PI.f64) 3) (.f64 -1/8748000 (.f64 b b))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))) -64800))) (/.f64 -180 (/.f64 (.f64 (.f64 (.f64 angle x-scale) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 b (*.f64 b y-scale)))))
(+.f64 (.f64 -1/2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (.f64 -1/1574640000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (+.f64 (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (.f64 y-scale (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 64800 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64))) (.f64 64800 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))))))) (+.f64 (.f64 -1/2 (.f64 angle (-.f64 (.f64 180 (/.f64 (.f64 y-scale (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 64800 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))))) (.f64 -180 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))))
(fma.f64 -1/2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 y-scale (/.f64 (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 2 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (.f64 -1/1574640000 (.f64 (.f64 a a) (pow.f64 (PI.f64) 4))))))) (fma.f64 180 (/.f64 (+.f64 (.f64 180 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/16200 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -64800 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))))) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))) (.f64 64800 (/.f64 (.f64 (.f64 (.f64 b b) y-scale) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000))) (.f64 x-scale (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))))))) (fma.f64 -1/2 (.f64 angle (+.f64 (.f64 180 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/16200 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -64800 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2))))))) (.f64 -180 (/.f64 y-scale (/.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 b b))))))
(fma.f64 -1/2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (-.f64 (.f64 (/.f64 y-scale (.f64 (PI.f64) (.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 2 (.f64 (pow.f64 (PI.f64) 4) (.f64 1/3149280000 (.f64 b b))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 4) -1/1574640000)))) (/.f64 (fma.f64 180 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 b b) -1/16200))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (pow.f64 (PI.f64) 3) (.f64 -1/8748000 (.f64 b b))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))) -64800)) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))))) (/.f64 (.f64 (.f64 64800 (.f64 b (.f64 b y-scale))) (.f64 (pow.f64 (PI.f64) 5) 1/1417176000000)) (.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 -1/2 (.f64 angle (fma.f64 180 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 b b) -1/16200))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (pow.f64 (PI.f64) 3) (.f64 -1/8748000 (.f64 b b))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))) -64800))) (/.f64 -180 (/.f64 (.f64 (.f64 (.f64 angle x-scale) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 b (*.f64 b y-scale))))))
(+.f64 (.f64 -1/2 (.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6))))) (.f64 2 (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6))))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (+.f64 (.f64 64800 (/.f64 (.f64 y-scale (.f64 (+.f64 (.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 -1/881596846080000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 -1/1469328076800000000 (pow.f64 (PI.f64) 7)) (.f64 -1/30855889612800000000 (pow.f64 (PI.f64) 7))))) (pow.f64 b 2))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))) (+.f64 (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (.f64 y-scale (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 64800 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (PI.f64))) (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))) (-.f64 (.f64 180 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (.f64 -1/1574640000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (+.f64 (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (.f64 y-scale (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 64800 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64))) (.f64 64800 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))))) (PI.f64)))))))) (+.f64 (.f64 -1/2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (.f64 -1/1574640000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (+.f64 (.f64 180 (/.f64 (.f64 (-.f64 (.f64 180 (/.f64 (.f64 y-scale (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 64800 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)))) (PI.f64))) (.f64 64800 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2267481600000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2))))))))) (+.f64 (.f64 -1/2 (.f64 angle (-.f64 (.f64 180 (/.f64 (.f64 y-scale (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))) (.f64 64800 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/11664000 (pow.f64 (PI.f64) 3)) (.f64 -1/34992000 (pow.f64 (PI.f64) 3))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 2)))))))) (.f64 -180 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))))
(fma.f64 -1/2 (.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 64800 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (.f64 b b) (fma.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7) (fma.f64 -1/881596846080000000 (pow.f64 (PI.f64) 7) (.f64 (pow.f64 (PI.f64) 7) -11/15427944806400000000)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))) (.f64 180 (+.f64 (/.f64 (+.f64 (.f64 180 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/16200 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -64800 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))))) (/.f64 (PI.f64) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000)))) (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (/.f64 (PI.f64) (-.f64 (.f64 180 (/.f64 y-scale (/.f64 (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 2 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (.f64 -1/1574640000 (.f64 (.f64 a a) (pow.f64 (PI.f64) 4))))))) (fma.f64 180 (/.f64 (+.f64 (.f64 180 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/16200 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -64800 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))))) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))) (.f64 64800 (/.f64 (.f64 (.f64 (.f64 b b) y-scale) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000))) (.f64 x-scale (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))))))))))))) (fma.f64 -1/2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 y-scale (/.f64 (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 2 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (.f64 -1/1574640000 (.f64 (.f64 a a) (pow.f64 (PI.f64) 4))))))) (fma.f64 180 (/.f64 (+.f64 (.f64 180 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/16200 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -64800 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))))) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))) (.f64 64800 (/.f64 (.f64 (.f64 (.f64 b b) y-scale) (fma.f64 1/2267481600000 (pow.f64 (PI.f64) 5) (.f64 (pow.f64 (PI.f64) 5) 1/3779136000000))) (.f64 x-scale (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))))))) (fma.f64 -1/2 (.f64 angle (+.f64 (.f64 180 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/16200 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -64800 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2))))))) (.f64 -180 (/.f64 y-scale (/.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 b b)))))))
(fma.f64 -1/2 (.f64 (pow.f64 angle 5) (-.f64 (/.f64 (.f64 (.f64 360 (+.f64 (.f64 (pow.f64 (PI.f64) 6) (.f64 1/765275040000000 (.f64 a a))) (.f64 b (.f64 b (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))) y-scale) (.f64 (PI.f64) (.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 64800 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)) (fma.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7) (.f64 (pow.f64 (PI.f64) 7) -19/10285296537600000000))))) (.f64 180 (+.f64 (/.f64 (fma.f64 180 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 b b) -1/16200))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (pow.f64 (PI.f64) 3) (.f64 -1/8748000 (.f64 b b))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))) -64800)) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 5) 1/1417176000000))) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 3) -1/8748000) (PI.f64)) (-.f64 (.f64 180 (-.f64 (.f64 (/.f64 y-scale (.f64 (PI.f64) (.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 2 (.f64 (pow.f64 (PI.f64) 4) (.f64 1/3149280000 (.f64 b b))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 4) -1/1574640000)))) (/.f64 (fma.f64 180 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 b b) -1/16200))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (pow.f64 (PI.f64) 3) (.f64 -1/8748000 (.f64 b b))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))) -64800)) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))))) (/.f64 (.f64 (.f64 64800 (.f64 b (.f64 b y-scale))) (.f64 (pow.f64 (PI.f64) 5) 1/1417176000000)) (.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale (-.f64 (.f64 b b) (.f64 a a)))))))))))) (fma.f64 -1/2 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (-.f64 (.f64 (/.f64 y-scale (.f64 (PI.f64) (.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 2 (.f64 (pow.f64 (PI.f64) 4) (.f64 1/3149280000 (.f64 b b))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 4) -1/1574640000)))) (/.f64 (fma.f64 180 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 b b) -1/16200))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (pow.f64 (PI.f64) 3) (.f64 -1/8748000 (.f64 b b))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))) -64800)) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) -1/8748000))))) (/.f64 (.f64 (.f64 64800 (.f64 b (.f64 b y-scale))) (.f64 (pow.f64 (PI.f64) 5) 1/1417176000000)) (.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 -1/2 (.f64 angle (fma.f64 180 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 b b) -1/16200))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (pow.f64 (PI.f64) 3) (.f64 -1/8748000 (.f64 b b))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2)))) -64800))) (/.f64 -180 (/.f64 (.f64 (.f64 (.f64 angle x-scale) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 b (.f64 b y-scale)))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale -1/2) (/.f64 (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale -1/2) (/.f64 (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale -1/2) (/.f64 (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale -1/2) (/.f64 (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale -1/2) (/.f64 (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale -1/2) (/.f64 (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale -1/2) (/.f64 (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale -1/2) (/.f64 (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(neg.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 (/.f64 y-scale x-scale) (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(+.f64 (.f64 -1/2 (.f64 (pow.f64 a 2) (-.f64 (.f64 2 (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(fma.f64 -1/2 (.f64 (.f64 a a) (+.f64 (.f64 2 (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 (.f64 x-scale (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b))))))) (neg.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(fma.f64 -1/2 (.f64 a (.f64 a (.f64 2 (+.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 b b))) y-scale)))))) (.f64 (/.f64 y-scale x-scale) (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(+.f64 (.f64 -1/2 (.f64 (pow.f64 a 2) (-.f64 (.f64 2 (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 4) (-.f64 (.f64 2 (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 b 2))) (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 -1/2 (.f64 (.f64 a a) (+.f64 (.f64 2 (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 (.f64 x-scale (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b))))))) (fma.f64 -1/2 (/.f64 (pow.f64 a 4) (/.f64 (.f64 b b) (+.f64 (.f64 2 (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 (.f64 x-scale (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)))))))) (neg.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(fma.f64 -1/2 (.f64 a (.f64 a (.f64 2 (+.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 b b))) y-scale)))))) (fma.f64 -1/2 (.f64 (/.f64 (pow.f64 a 4) (.f64 b b)) (.f64 2 (+.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 b b))) y-scale))))) (.f64 (/.f64 y-scale x-scale) (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))))
(+.f64 (.f64 -1/2 (.f64 (pow.f64 a 2) (-.f64 (.f64 2 (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 4) (-.f64 (.f64 2 (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 b 2))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 6) (-.f64 (.f64 2 (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -2 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (pow.f64 b 4))) (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.f64 -1/2 (.f64 (.f64 a a) (+.f64 (.f64 2 (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 (.f64 x-scale (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b))))))) (fma.f64 -1/2 (/.f64 (pow.f64 a 4) (/.f64 (.f64 b b) (+.f64 (.f64 2 (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 (.f64 x-scale (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)))))))) (fma.f64 -1/2 (/.f64 (pow.f64 a 6) (/.f64 (pow.f64 b 4) (+.f64 (.f64 2 (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 (.f64 x-scale (.f64 b b)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b b)))))))) (neg.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.f64 -1/2 (.f64 a (.f64 a (.f64 2 (+.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 b b))) y-scale)))))) (fma.f64 -1/2 (.f64 (/.f64 (pow.f64 a 4) (.f64 b b)) (.f64 2 (+.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 b b))) y-scale))))) (fma.f64 -1/2 (.f64 (/.f64 (pow.f64 a 6) (pow.f64 b 4)) (.f64 2 (+.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (.f64 b b))) y-scale))))) (.f64 (/.f64 y-scale x-scale) (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2))) (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(fma.f64 -1/2 (/.f64 (-.f64 (.f64 -2 (/.f64 (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 b b)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale))) (.f64 2 (/.f64 (.f64 (.f64 (.f64 b b) y-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 a a)) (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(fma.f64 -1/2 (/.f64 (.f64 -2 (+.f64 (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (.f64 b y-scale))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale) (.f64 (/.f64 y-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))))) (.f64 a a)) (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2)) (pow.f64 a 4))) (+.f64 (.f64 -1/2 (/.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2))) (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(fma.f64 -1/2 (/.f64 (-.f64 (.f64 -2 (/.f64 (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 b b)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale))) (.f64 2 (/.f64 (.f64 (.f64 (.f64 b b) y-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (pow.f64 a 4) (.f64 b b))) (fma.f64 -1/2 (/.f64 (-.f64 (.f64 -2 (/.f64 (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 b b)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale))) (.f64 2 (/.f64 (.f64 (.f64 (.f64 b b) y-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 a a)) (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(fma.f64 -1/2 (/.f64 (.f64 -2 (+.f64 (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (.f64 b y-scale))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale) (.f64 (/.f64 y-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))))) (/.f64 (pow.f64 a 4) (.f64 b b))) (fma.f64 -1/2 (/.f64 (.f64 -2 (+.f64 (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (.f64 b y-scale))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale) (.f64 (/.f64 y-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))))) (.f64 a a)) (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2)) (pow.f64 a 4))) (+.f64 (.f64 -1/2 (/.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 4)) (pow.f64 a 6))) (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 -1/2 (/.f64 (-.f64 (.f64 -2 (/.f64 (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 b b)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale))) (.f64 2 (/.f64 (.f64 (.f64 (.f64 b b) y-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (pow.f64 a 4) (.f64 b b))) (fma.f64 -1/2 (/.f64 (-.f64 (.f64 -2 (/.f64 (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 b b)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale))) (.f64 2 (/.f64 (.f64 (.f64 (.f64 b b) y-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 a a)) (fma.f64 -1/2 (/.f64 (-.f64 (.f64 -2 (/.f64 (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 b b)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale))) (.f64 2 (/.f64 (.f64 (.f64 (.f64 b b) y-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (pow.f64 a 6) (pow.f64 b 4))) (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 -1/2 (/.f64 (.f64 -2 (+.f64 (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (.f64 b y-scale))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale) (.f64 (/.f64 y-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))))) (/.f64 (pow.f64 a 4) (.f64 b b))) (fma.f64 -1/2 (/.f64 (.f64 -2 (+.f64 (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (.f64 b y-scale))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale) (.f64 (/.f64 y-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))))) (.f64 a a)) (fma.f64 -1/2 (.f64 (/.f64 (.f64 -2 (+.f64 (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (.f64 b y-scale))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale) (.f64 (/.f64 y-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))))) (pow.f64 a 6)) (pow.f64 b 4)) (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(+.f64 (.f64 -1/2 (/.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2))) (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(fma.f64 -1/2 (/.f64 (-.f64 (.f64 -2 (/.f64 (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 b b)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale))) (.f64 2 (/.f64 (.f64 (.f64 (.f64 b b) y-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 a a)) (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(fma.f64 -1/2 (/.f64 (.f64 -2 (+.f64 (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (.f64 b y-scale))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale) (.f64 (/.f64 y-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))))) (.f64 a a)) (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2)) (pow.f64 a 4))) (+.f64 (.f64 -1/2 (/.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2))) (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(fma.f64 -1/2 (/.f64 (-.f64 (.f64 -2 (/.f64 (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 b b)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale))) (.f64 2 (/.f64 (.f64 (.f64 (.f64 b b) y-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (pow.f64 a 4) (.f64 b b))) (fma.f64 -1/2 (/.f64 (-.f64 (.f64 -2 (/.f64 (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 b b)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale))) (.f64 2 (/.f64 (.f64 (.f64 (.f64 b b) y-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 a a)) (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(fma.f64 -1/2 (/.f64 (.f64 -2 (+.f64 (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (.f64 b y-scale))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale) (.f64 (/.f64 y-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))))) (/.f64 (pow.f64 a 4) (.f64 b b))) (fma.f64 -1/2 (/.f64 (.f64 -2 (+.f64 (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (.f64 b y-scale))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale) (.f64 (/.f64 y-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))))) (.f64 a a)) (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 2)) (pow.f64 a 4))) (+.f64 (.f64 -1/2 (/.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (-.f64 (.f64 -2 (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 b 4)) (pow.f64 a 6))) (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 -1/2 (/.f64 (-.f64 (.f64 -2 (/.f64 (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 b b)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale))) (.f64 2 (/.f64 (.f64 (.f64 (.f64 b b) y-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (pow.f64 a 4) (.f64 b b))) (fma.f64 -1/2 (/.f64 (-.f64 (.f64 -2 (/.f64 (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 b b)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale))) (.f64 2 (/.f64 (.f64 (.f64 (.f64 b b) y-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 a a)) (fma.f64 -1/2 (/.f64 (-.f64 (.f64 -2 (/.f64 (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale) (.f64 b b)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale))) (.f64 2 (/.f64 (.f64 (.f64 (.f64 b b) y-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (pow.f64 a 6) (pow.f64 b 4))) (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 -1/2 (/.f64 (.f64 -2 (+.f64 (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (.f64 b y-scale))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale) (.f64 (/.f64 y-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))))) (/.f64 (pow.f64 a 4) (.f64 b b))) (fma.f64 -1/2 (/.f64 (.f64 -2 (+.f64 (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (.f64 b y-scale))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale) (.f64 (/.f64 y-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))))) (.f64 a a)) (fma.f64 -1/2 (.f64 (/.f64 (.f64 -2 (+.f64 (/.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (.f64 b y-scale))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale) (.f64 (/.f64 y-scale (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))))) (pow.f64 a 6)) (pow.f64 b 4)) (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale -1/2) (/.f64 (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale -1/2) (/.f64 (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale -1/2) (/.f64 (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale -1/2) (/.f64 (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale -1/2) (/.f64 (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale -1/2) (/.f64 (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale -1/2) (/.f64 (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale -1/2) (/.f64 (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale -1/2) (/.f64 (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale -1/2) (/.f64 (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale -1/2) (/.f64 (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale -1/2) (/.f64 (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale -1/2) (/.f64 (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale -1/2) (/.f64 (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale -1/2) (/.f64 (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale -1/2) (/.f64 (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale -1/2) (/.f64 (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale -1/2) (/.f64 (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale -1/2) (/.f64 (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale -1/2) (/.f64 (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale -1/2) (/.f64 (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale -1/2) (/.f64 (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale -1/2) (/.f64 (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale -1/2) (/.f64 (/.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a))))) 2) (+.f64 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))
(.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (/.f64 1 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (*.f64 x-scale (+.f64 b a)) (-.f64 b a)))))))
(/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 x-scale (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (*.f64 x-scale (+.f64 b a)) (-.f64 b a)))))) 1)
(/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 x-scale (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 1 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (*.f64 x-scale (+.f64 b a)) (-.f64 b a)))))))
(/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 x-scale (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (/.f64 1 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (*.f64 x-scale (+.f64 b a)) (-.f64 b a))))))))
(.f64 (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (/.f64 1 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))))))) (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))
(.f64 (/.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))
(.f64 (sqrt.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a))))))) (sqrt.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (*.f64 x-scale (+.f64 b a)) (-.f64 b a))))))))
(/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 x-scale (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (cbrt.f64 (.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (cbrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (/.f64 1 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (*.f64 x-scale (+.f64 b a)) (-.f64 b a))))))))
(.f64 (cbrt.f64 (.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (/.f64 1 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))))))) (cbrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))
(.f64 (/.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (cbrt.f64 (.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (cbrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))))
(.f64 (cbrt.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a))))))) (cbrt.f64 (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))))) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))))))))
(.f64 (cbrt.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 x-scale (-.f64 (.f64 b b) (.f64 a a)))))))) (cbrt.f64 (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))))))) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 x-scale (-.f64 (.f64 b b) (*.f64 a a))))))))))
(.f64 (cbrt.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))))) (cbrt.f64 (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a)))))) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (*.f64 a a)))))))))
(.f64 (cbrt.f64 (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))))) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))))))) (cbrt.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a))))))))
(.f64 (cbrt.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 x-scale (-.f64 (.f64 b b) (.f64 a a)))))))) (cbrt.f64 (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))))))) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 x-scale (-.f64 (.f64 b b) (*.f64 a a))))))))))
(.f64 (cbrt.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))))) (cbrt.f64 (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a)))))) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (*.f64 a a)))))))))
(.f64 (/.f64 1 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 x-scale (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (/.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))) (+.f64 (sin.f64 (.f64 (.f64 angle (PI.f64)) 0)) (sin.f64 (.f64 (*.f64 angle (PI.f64)) 1/90)))) 2)
(.f64 2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 angle (.f64 (PI.f64) 1/90)))) (.f64 x-scale (.f64 x-scale (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))) (+.f64 (sin.f64 0) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/90)))))))
(pow.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))))) 1)
(/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 x-scale (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (*.f64 a a))))))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (.f64 x-scale x-scale) (neg.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(/.f64 (neg.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (neg.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(/.f64 (neg.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (.f64 x-scale (.f64 x-scale (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))))
(log.f64 (exp.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a))))))))
(/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 x-scale (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (*.f64 a a))))))
(cbrt.f64 (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))))) (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))))) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))))))))
(cbrt.f64 (pow.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 x-scale (-.f64 (.f64 b b) (*.f64 a a))))))) 3))
(cbrt.f64 (pow.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (*.f64 a a)))))) 3))
(expm1.f64 (log1p.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a))))))))
(/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 x-scale (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (*.f64 a a))))))
(exp.f64 (log.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a))))))))
(/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 x-scale (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (*.f64 a a))))))
(log1p.f64 (expm1.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a))))))))
(/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 x-scale (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 1)
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(.f64 1 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(.f64 (sqrt.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sqrt.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(.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 (PI.f64) (.f64 1/180 angle))) 2)) (cbrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.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 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 (PI.f64) (.f64 1/180 angle))) 2)) (cbrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 1)
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(log.f64 (exp.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(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 (PI.f64) (.f64 1/180 angle))) (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))
(expm1.f64 (log1p.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(exp.f64 (log.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(log1p.f64 (expm1.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 1)
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(.f64 1 (sin.f64 (.f64 1/180 (*.f64 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 1/180 (.f64 angle (PI.f64))))) (sqrt.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (cbrt.f64 (sin.f64 (.f64 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 (cbrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 1)
(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 1/180 (.f64 angle (PI.f64))))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(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 (PI.f64) (.f64 1/180 angle))) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))
(expm1.f64 (log1p.f64 (sin.f64 (.f64 1/180 (.f64 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 1/180 (.f64 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 1/180 (.f64 angle (PI.f64))))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(/.f64 (.f64 (.f64 x-scale y-scale) (.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) -1/2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (*.f64 x-scale (+.f64 b a)) (-.f64 b a))))))
(.f64 (/.f64 (.f64 x-scale y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 -1/2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 x-scale (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 (/.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (*.f64 a a)))) -1/2)))
(/.f64 (.f64 (.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) -1/2) (.f64 x-scale y-scale)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (*.f64 x-scale (+.f64 b a)) (-.f64 b a))))))
(.f64 (/.f64 (.f64 x-scale y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 -1/2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 x-scale (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 (/.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (*.f64 a a)))) -1/2)))
(pow.f64 (.f64 x-scale (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))))) (*.f64 -1/2 y-scale))) 1)
(.f64 (/.f64 (.f64 x-scale y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 -1/2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 x-scale (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 (/.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (*.f64 a a)))) -1/2)))
(log.f64 (exp.f64 (.f64 x-scale (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))))) (*.f64 -1/2 y-scale)))))
(.f64 (/.f64 (.f64 x-scale y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 -1/2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 x-scale (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 (/.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (*.f64 a a)))) -1/2)))
(cbrt.f64 (.f64 (.f64 x-scale (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))))) (.f64 -1/2 y-scale))) (.f64 (.f64 (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))))) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a))))))) 1/4) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))
(cbrt.f64 (.f64 x-scale (.f64 (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 y-scale -1/2)) (.f64 (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))))))) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 x-scale (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 1/4 (.f64 x-scale (.f64 x-scale (*.f64 y-scale y-scale))))))))
(cbrt.f64 (.f64 (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a)))))) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 (.f64 1/4 (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) (.f64 (/.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a)))) -1/2))))))
(expm1.f64 (log1p.f64 (.f64 x-scale (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))))) (*.f64 -1/2 y-scale)))))
(.f64 (/.f64 (.f64 x-scale y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 -1/2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 x-scale (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 (/.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (*.f64 a a)))) -1/2)))
(exp.f64 (log.f64 (.f64 x-scale (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))))) (*.f64 -1/2 y-scale)))))
(.f64 (/.f64 (.f64 x-scale y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 -1/2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 x-scale (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 (/.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (*.f64 a a)))) -1/2)))
(log1p.f64 (expm1.f64 (.f64 x-scale (.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a)))))) (*.f64 -1/2 y-scale)))))
(.f64 (/.f64 (.f64 x-scale y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 -1/2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 x-scale (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 (/.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (*.f64 a a)))) -1/2)))

localize384.0ms (0.3%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
	61.7%	(cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))
✓	61.6%	(cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
	61.6%	(sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))
✓	61.4%	(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))

Compiler

Compiled 1042 to 621 computations (40.4% saved)

series1.0ms (0%)

Counts

2 → 24

Calls

6 calls:

Time	Variable		Point	Expression
0.0ms	angle	@	0	(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
0.0ms	angle	@	0	(cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
0.0ms	angle	@	inf	(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
0.0ms	angle	@	-inf	(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
0.0ms	angle	@	inf	(cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))

rewrite104.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

948×	`*-commutative`
934×	`cbrt-prod`
846×	`sqrt-prod`
682×	`unswap-sqr`
586×	`swap-sqr`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	11	38
1	216	38
2	2492	38

Stop Event

1×	node limit

Counts

2 → 62

Calls

Call 1

Inputs
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))

Outputs

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

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

simplify91.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

778×	`associate-/l/`
672×	`associate-/r/`
664×	`fma-def`
580×	`distribute-rgt-neg-in`
564×	`distribute-lft-neg-in`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	208	2758
1	493	2710
2	2110	2574
3	5903	2574

Stop Event

1×	node limit

Counts

86 → 122

Calls

Call 1

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

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

eval2.9s (2%)

Compiler: Compiled 172154 to 95609 computations (44.5% saved)

prune1.2s (0.8%)

Pruning

68 alts after pruning (68 fresh and 0 done)

	Pruned	Kept	Total
New	1694	63	1757
Fresh	19	5	24
Picked	1	0	1
Done	4	0	4
Total	1718	68	1786

Accurracy

84.4%

Counts

1786 → 68

Alt Table

Click to see full alt table

Status	Accuracy	Program
	11.0%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (.f64 90 (/.f64 2 (/.f64 (.f64 (.f64 angle (-.f64 (.f64 b b) (.f64 a a))) (PI.f64)) (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 b (/.f64 (.f64 x-scale x-scale) b)))))))))
	35.2%	(.f64 (atan.f64 (.f64 y-scale (fma.f64 -1 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (.f64 a (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (.f64 a a)))))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))) (/.f64 180 (PI.f64)))
	18.3%	(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (/.f64 180 (PI.f64)))
	18.3%	(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 1 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))))) (/.f64 180 (PI.f64)))
	18.0%	(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 1 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))))) (/.f64 180 (PI.f64)))
	42.9%	(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 1/2 (.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) (/.f64 180 (PI.f64)))
	22.9%	(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (/.f64 1/360 (/.f64 (.f64 b b) (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (.f64 (*.f64 x-scale x-scale) angle))))))) (/.f64 180 (PI.f64)))
	43.8%	(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))) (/.f64 180 (PI.f64)))
	44.7%	(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (.f64 -1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 180 (PI.f64)))
	50.9%	(.f64 (atan.f64 (.f64 y-scale (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))))) (/.f64 180 (PI.f64)))
	7.9%	(.f64 (atan.f64 (.f64 y-scale (.f64 90 (.f64 (/.f64 x-scale angle) (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (/.f64 180 (PI.f64)))
	22.1%	(.f64 (atan.f64 (.f64 y-scale (.f64 -180 (/.f64 (/.f64 (.f64 b b) (.f64 x-scale angle)) (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64))))))) (/.f64 180 (PI.f64)))
	23.5%	(.f64 (atan.f64 (.f64 y-scale (.f64 -180 (/.f64 (.f64 b b) (.f64 (.f64 x-scale angle) (.f64 (-.f64 (.f64 b b) (*.f64 a a)) (PI.f64))))))) (/.f64 180 (PI.f64)))
	28.2%	(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) x-scale)))))) (/.f64 180 (PI.f64)))
▶	43.7%	(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
	42.8%	(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))) (/.f64 180 (PI.f64)))
	22.3%	(.f64 (atan.f64 (.f64 y-scale (neg.f64 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))))))) (/.f64 180 (PI.f64)))
	21.8%	(.f64 (atan.f64 (.f64 y-scale (cbrt.f64 (pow.f64 (.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (/.f64 (/.f64 (.f64 x-scale -1) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) 3)))) (/.f64 180 (PI.f64)))
	23.5%	(.f64 180 (/.f64 (atan.f64 (fma.f64 -1/2 (.f64 angle (+.f64 (.f64 180 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/16200 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -64800 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2))))))) (.f64 -180 (/.f64 y-scale (/.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (*.f64 b b)))))) (PI.f64)))
	49.3%	(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))) (PI.f64)))
	22.7%	(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 1/2 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
	17.8%	(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 -1/2 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
	13.8%	(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (/.f64 (/.f64 (.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))) (PI.f64)))
	26.7%	(.f64 180 (/.f64 (atan.f64 (/.f64 -180 (/.f64 (.f64 (.f64 (.f64 angle x-scale) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 b (.f64 b y-scale))))) (PI.f64)))
▶	52.2%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
	51.4%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (PI.f64)))
	44.1%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (PI.f64)))
	21.5%	(.f64 180 (/.f64 (atan.f64 (.f64 (.f64 -1/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 1 2)))) (.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (*.f64 y-scale x-scale))) (PI.f64)))
	39.5%	(.f64 180 (/.f64 (atan.f64 (.f64 (.f64 -1/2 (/.f64 (.f64 2 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale)))) (*.f64 y-scale x-scale))) (PI.f64)))
	41.6%	(.f64 180 (/.f64 (atan.f64 (.f64 (.f64 -1/2 (/.f64 -2 (/.f64 (.f64 x-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (*.f64 y-scale x-scale))) (PI.f64)))
	16.3%	(.f64 180 (/.f64 (atan.f64 (.f64 (.f64 -1/2 (expm1.f64 (log1p.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a))))))))) (.f64 y-scale x-scale))) (PI.f64)))
▶	13.1%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))) x-scale)))) (PI.f64)))
	10.8%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (.f64 (/.f64 (.f64 angle (PI.f64)) 1) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))))) (PI.f64)))
	38.2%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (.f64 x-scale (.f64 (*.f64 angle (PI.f64)) -1/2))))) (PI.f64)))
	9.1%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (*.f64 angle (PI.f64))) x-scale))))) (PI.f64)))
	8.6%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 x-scale (*.f64 angle (PI.f64)))))))) (PI.f64)))
	7.0%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (log.f64 (exp.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))))) (PI.f64)))
	5.2%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (exp.f64 (log.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))))) (PI.f64)))
	38.7%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 -2 (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale)))) (PI.f64)))
	9.3%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (/.f64 angle x-scale)) (/.f64 (cbrt.f64 y-scale) (.f64 1/2 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))) (PI.f64)))
	10.0%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle)) y-scale))) (PI.f64)))
	10.7%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale 2)) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (PI.f64)))
	10.5%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (neg.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (/.f64 (/.f64 y-scale angle) (.f64 (PI.f64) (neg.f64 (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
	11.5%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 y-scale (.f64 (/.f64 2 (PI.f64)) (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (*.f64 a a))) (/.f64 x-scale angle)))))) (PI.f64)))
	1.9%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))))))) (PI.f64)))
	11.4%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64)))))) (PI.f64)))
	23.1%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64))) x-scale)))))) (PI.f64)))
▶	11.4%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64))))))) (PI.f64)))
	10.1%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (log.f64 (exp.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle))))))) (PI.f64)))
	15.4%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (pow.f64 (/.f64 (hypot.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2)))) (sqrt.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/90)))))) 2)))) (PI.f64)))
	29.3%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (pow.f64 (/.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))) 1/2) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (-.f64 (.f64 b b) (.f64 a a)))) -1)))) (PI.f64)))
	25.5%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))))) (PI.f64)))
	18.8%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))))) (PI.f64)))
	24.4%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (fabs.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (-.f64 (.f64 b b) (.f64 a a))))))) (PI.f64)))
	24.3%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1) (-.f64 (.f64 b b) (.f64 a a))))))) (PI.f64)))
	20.7%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (fabs.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))))) (PI.f64)))
▶	25.5%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 1 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))))) (PI.f64)))
	23.6%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (log.f64 (exp.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))))) (PI.f64)))
	26.7%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))) (PI.f64)))
	29.1%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2)))) 2) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))) (PI.f64)))
	29.3%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)))) (/.f64 (/.f64 1 (.f64 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))) 1/2)) (neg.f64 (-.f64 (.f64 b b) (*.f64 a a)))))))) (PI.f64)))
	25.3%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (.f64 360 (.f64 (/.f64 b angle) (/.f64 b (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))) (PI.f64)))
	29.2%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (.f64 2 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/90))))))))) (PI.f64)))
	19.6%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (sqrt.f64 (pow.f64 (.f64 2 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/90)))))) 2))))) (PI.f64)))
	26.9%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (log1p.f64 (expm1.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2))))))) (PI.f64)))
	43.7%	(.f64 180 (/.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (PI.f64)))
	23.5%	(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 y-scale (/.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 b b))))) (PI.f64)))
	44.9%	(.f64 180 (/.f64 (atan.f64 (neg.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (PI.f64)))

Compiler

Compiled 7122 to 4910 computations (31.1% saved)

localize92.0ms (0.1%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	99.4%	(.f64 (PI.f64) (.f64 1/180 angle))
✓	95.7%	(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
	61.6%	(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
	61.4%	(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))

Compiler

Compiled 124 to 78 computations (37.1% saved)

series10.0ms (0%)

Counts

2 → 48

Calls

12 calls:

Time	Variable		Point	Expression
2.0ms	angle	@	inf	(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
1.0ms	angle	@	0	(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
1.0ms	x-scale	@	inf	(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
1.0ms	y-scale	@	0	(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
1.0ms	angle	@	-inf	(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))

rewrite190.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

1746×	`associate-/l*`
352×	`distribute-lft-neg-in`
344×	`add-sqr-sqrt`
340×	`pow1`
340×	`*-un-lft-identity`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	16	46
1	334	46
2	4401	46

Stop Event

1×	node limit

Counts

2 → 179

Calls

Call 1

Inputs
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (PI.f64) (.f64 1/180 angle))

Outputs

(((-.f64 (exp.f64 (log1p.f64 (*.f64 (/.f64 y-scale x-scale) (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 y-scale (/.f64 x-scale (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 y-scale (*.f64 x-scale (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 y-scale (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 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 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 y-scale (/.f64 (/.f64 x-scale (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 y-scale (/.f64 (*.f64 x-scale (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 y-scale (/.f64 (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 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 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 y-scale (/.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 1 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 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 y-scale (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (/.f64 1 x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 y-scale (/.f64 (*.f64 x-scale (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (/.f64 y-scale x-scale) (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (/.f64 x-scale y-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-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 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 (*.f64 (/.f64 x-scale y-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 (/.f64 x-scale y-scale) (/.f64 1 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 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 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (neg.f64 x-scale)) (neg.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-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 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 1 (/.f64 x-scale (*.f64 y-scale (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 1 (/.f64 (/.f64 x-scale (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 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 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 1 (/.f64 (*.f64 x-scale (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) 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 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 1 (/.f64 (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-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 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 1 (/.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 1 (/.f64 (*.f64 (/.f64 x-scale y-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 1 (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 1 (/.f64 (/.f64 x-scale y-scale) (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 1 (/.f64 (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale)) (neg.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 1 (/.f64 (*.f64 (/.f64 x-scale y-scale) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (sqrt.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (/.f64 x-scale y-scale) (sqrt.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (sqrt.f64 y-scale) (/.f64 (/.f64 x-scale (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (sqrt.f64 y-scale) (/.f64 (*.f64 x-scale (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (sqrt.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (sqrt.f64 y-scale) (/.f64 (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale) (sqrt.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (sqrt.f64 y-scale) (/.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 (sqrt.f64 y-scale) (/.f64 1 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 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (sqrt.f64 y-scale) (/.f64 x-scale (*.f64 (sqrt.f64 y-scale) (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (sqrt.f64 y-scale) (/.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 (sqrt.f64 y-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (sqrt.f64 y-scale) (/.f64 (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale)) (neg.f64 (sqrt.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (sqrt.f64 y-scale) (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 x-scale (sqrt.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (/.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 (/.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (*.f64 (/.f64 x-scale y-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)) (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (/.f64 x-scale y-scale) (*.f64 (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 1 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (*.f64 (/.f64 x-scale y-scale) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (neg.f64 (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 (/.f64 x-scale y-scale) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (cbrt.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (/.f64 x-scale y-scale) (pow.f64 (cbrt.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (pow.f64 (cbrt.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (/.f64 (/.f64 x-scale y-scale) (cbrt.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (cbrt.f64 y-scale) (/.f64 (/.f64 x-scale (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (pow.f64 (cbrt.f64 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 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (cbrt.f64 y-scale) (/.f64 (*.f64 x-scale (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 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 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (cbrt.f64 y-scale) (/.f64 (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale) (pow.f64 (cbrt.f64 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 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (/.f64 x-scale (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (cbrt.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (*.f64 x-scale (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (cbrt.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale) (cbrt.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 (cbrt.f64 y-scale) (/.f64 1 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 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 x-scale (*.f64 (cbrt.f64 y-scale) (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 (cbrt.f64 y-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale)) (neg.f64 (cbrt.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 x-scale (cbrt.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (/.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (/.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (cbrt.f64 (/.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (*.f64 (/.f64 x-scale y-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (/.f64 (*.f64 (/.f64 x-scale y-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)) (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (/.f64 (/.f64 x-scale y-scale) (*.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 1 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (/.f64 (*.f64 (/.f64 x-scale y-scale) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (neg.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (*.f64 (/.f64 x-scale y-scale) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (*.f64 (/.f64 y-scale x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (*.f64 y-scale (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 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 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (/.f64 1 x-scale) (/.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 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 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (/.f64 1 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (/.f64 x-scale y-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (*.f64 y-scale (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (*.f64 y-scale (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 x-scale (/.f64 1 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (neg.f64 y-scale) (*.f64 (neg.f64 x-scale) (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (neg.f64 y-scale) (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (neg.f64 y-scale) (/.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 1 (neg.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (neg.f64 y-scale) (/.f64 (*.f64 (neg.f64 x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (neg.f64 y-scale) (/.f64 (neg.f64 x-scale) (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (neg.f64 y-scale) (/.f64 (*.f64 (neg.f64 x-scale) (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (neg.f64 y-scale) (/.f64 (*.f64 (neg.f64 x-scale) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 (/.f64 x-scale y-scale) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 x-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 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (/.f64 x-scale y-scale) (/.f64 1 (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 x-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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (*.f64 (neg.f64 x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 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 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale)) (neg.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (sqrt.f64 (*.f64 (/.f64 y-scale x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (sqrt.f64 (*.f64 (/.f64 y-scale x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (sqrt.f64 (*.f64 y-scale (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (/.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 (*.f64 y-scale (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (sqrt.f64 (*.f64 y-scale (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (/.f64 x-scale (sqrt.f64 (*.f64 y-scale (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (sqrt.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (/.f64 (*.f64 (/.f64 x-scale y-scale) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (sqrt.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (sqrt.f64 (neg.f64 y-scale)) (/.f64 (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale)) (sqrt.f64 (neg.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (*.f64 (cbrt.f64 (*.f64 (/.f64 y-scale x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (cbrt.f64 (*.f64 (/.f64 y-scale x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cbrt.f64 (*.f64 (/.f64 y-scale x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (*.f64 (cbrt.f64 (*.f64 y-scale (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (cbrt.f64 (*.f64 y-scale (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (/.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (cbrt.f64 (*.f64 y-scale (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (*.f64 (cbrt.f64 (*.f64 y-scale (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (cbrt.f64 (*.f64 y-scale (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (/.f64 x-scale (cbrt.f64 (*.f64 y-scale (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (*.f64 (cbrt.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (cbrt.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (/.f64 (*.f64 (/.f64 x-scale y-scale) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (cbrt.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (*.f64 (cbrt.f64 (neg.f64 y-scale)) (cbrt.f64 (neg.f64 y-scale))) (/.f64 (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale)) (cbrt.f64 (neg.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (*.f64 y-scale (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (/.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (*.f64 y-scale (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (/.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (*.f64 (/.f64 y-scale x-scale) (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (*.f64 (/.f64 y-scale x-scale) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (*.f64 y-scale (sqrt.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (/.f64 x-scale (sqrt.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (*.f64 y-scale (pow.f64 (cbrt.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (/.f64 x-scale (cbrt.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (*.f64 (/.f64 y-scale x-scale) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (*.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (neg.f64 y-scale)) (neg.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (*.f64 y-scale (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 x-scale (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (*.f64 (neg.f64 y-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 (neg.f64 x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (*.f64 (neg.f64 y-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (neg.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (/.f64 1 (sqrt.f64 x-scale)) (/.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 y-scale (sqrt.f64 x-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (/.f64 1 (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 y-scale (cbrt.f64 x-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (/.f64 1 (sqrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (/.f64 (/.f64 x-scale y-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (sqrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (/.f64 1 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (/.f64 (/.f64 x-scale y-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cbrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (/.f64 y-scale 1) (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 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 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (/.f64 y-scale (sqrt.f64 x-scale)) (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 x-scale))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 x-scale) 2)) (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (cbrt.f64 x-scale))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 (sqrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (sqrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (/.f64 (*.f64 (/.f64 y-scale x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (/.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 (sqrt.f64 x-scale) y-scale)) (sqrt.f64 x-scale)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (/.f64 y-scale (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (cbrt.f64 x-scale)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 1) (*.f64 (/.f64 x-scale y-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (sqrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (/.f64 x-scale y-scale) (sqrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (*.f64 (/.f64 x-scale y-scale) (cbrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 -1 (/.f64 (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-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 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 -1 (/.f64 (*.f64 (/.f64 x-scale y-scale) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 -1 (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 (/.f64 x-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 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 -1 (*.f64 (/.f64 x-scale y-scale) (neg.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (neg.f64 (sqrt.f64 y-scale)) (/.f64 (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale)) (sqrt.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (neg.f64 (pow.f64 (cbrt.f64 y-scale) 2)) (/.f64 (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale)) (cbrt.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (neg.f64 (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (/.f64 (*.f64 (/.f64 x-scale y-scale) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (neg.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (/.f64 (*.f64 (/.f64 x-scale y-scale) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (*.f64 (sqrt.f64 y-scale) (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (/.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 (sqrt.f64 y-scale) (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (*.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (*.f64 (sqrt.f64 y-scale) (sqrt.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (/.f64 x-scale (*.f64 (sqrt.f64 y-scale) (sqrt.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (/.f64 (sqrt.f64 y-scale) 1) (/.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (sqrt.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (/.f64 (sqrt.f64 y-scale) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (sqrt.f64 y-scale) (cbrt.f64 x-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) 1) (/.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (cbrt.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (sqrt.f64 x-scale)) (/.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (cbrt.f64 y-scale) (sqrt.f64 x-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (cbrt.f64 (/.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (/.f64 (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 1) (/.f64 (/.f64 x-scale y-scale) (/.f64 (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (/.f64 (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (/.f64 (/.f64 x-scale y-scale) (/.f64 (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (cbrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) 1) (/.f64 (/.f64 x-scale y-scale) (/.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (sqrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (/.f64 (/.f64 x-scale y-scale) (/.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (/.f64 (/.f64 x-scale y-scale) (cbrt.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (*.f64 (neg.f64 y-scale) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (neg.f64 x-scale) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (neg.f64 y-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (neg.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 y-scale)) (*.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (*.f64 (neg.f64 (/.f64 y-scale x-scale)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((/.f64 (*.f64 (neg.f64 y-scale) (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((pow.f64 (*.f64 (/.f64 y-scale x-scale) (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((pow.f64 (sqrt.f64 (*.f64 (/.f64 y-scale x-scale) (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((pow.f64 (cbrt.f64 (*.f64 (/.f64 y-scale x-scale) (tan.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((pow.f64 (pow.f64 (*.f64 (/.f64 y-scale x-scale) (tan.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((sqrt.f64 (pow.f64 (*.f64 (/.f64 y-scale x-scale) (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((log.f64 (pow.f64 (exp.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 (/.f64 y-scale x-scale) (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((cbrt.f64 (pow.f64 (*.f64 (/.f64 y-scale x-scale) (tan.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (/.f64 y-scale x-scale) 3) (pow.f64 (tan.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3) (pow.f64 (/.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((expm1.f64 (log1p.f64 (*.f64 (/.f64 y-scale x-scale) (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((exp.f64 (log.f64 (*.f64 (/.f64 y-scale x-scale) (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 y-scale x-scale) (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)) ((log1p.f64 (expm1.f64 (*.f64 (/.f64 y-scale x-scale) (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (PI.f64) (*.f64 1/180 angle))) #f)))

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

simplify163.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

1000×	`associate-/r/`
696×	`associate-/l*`
660×	`associate-/r*`
630×	`associate-/l/`
622×	`*-commutative`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	549	12693
1	1493	12441
2	5620	12441

Stop Event

1×	node limit

Counts

227 → 288

Calls

Call 1

Inputs
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(+.f64 (.f64 1/180 (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)) (.f64 (-.f64 (.f64 -1/34992000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/11664000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale))) (pow.f64 angle 3)))
(+.f64 (.f64 1/180 (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)) (+.f64 (.f64 (-.f64 (.f64 -1/34992000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/11664000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale))) (pow.f64 angle 3)) (.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 5)) x-scale)) (+.f64 (.f64 1/4534963200000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 5)) x-scale)) (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/11664000 (/.f64 (*.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale))) (pow.f64 (PI.f64) 2))))))))
(+.f64 (.f64 1/180 (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)) (+.f64 (.f64 (-.f64 (.f64 -1/34992000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/11664000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale))) (pow.f64 angle 3)) (+.f64 (.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 5)) x-scale)) (+.f64 (.f64 1/4534963200000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 5)) x-scale)) (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/11664000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale))) (pow.f64 (PI.f64) 2)))))) (.f64 (pow.f64 angle 7) (-.f64 (.f64 -1/30855889612800000000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 7)) x-scale)) (+.f64 (.f64 -1/4407984230400000000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 7)) x-scale)) (+.f64 (.f64 1/25194240000 (.f64 (-.f64 (.f64 -1/34992000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/11664000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale))) (pow.f64 (PI.f64) 4))) (.f64 -1/64800 (.f64 (-.f64 (.f64 1/22674816000000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 5)) x-scale)) (+.f64 (.f64 1/4534963200000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 5)) x-scale)) (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/11664000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale))) (pow.f64 (PI.f64) 2))))) (pow.f64 (PI.f64) 2))))))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(-.f64 (exp.f64 (log1p.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) 1)
(/.f64 y-scale (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 y-scale (.f64 x-scale (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 y-scale (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))
(/.f64 y-scale (/.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 1))
(/.f64 y-scale (/.f64 (.f64 x-scale (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 1))
(/.f64 y-scale (/.f64 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale) 1))
(/.f64 y-scale (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 1 x-scale)))
(/.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (/.f64 1 x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (/.f64 x-scale y-scale) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (/.f64 x-scale y-scale) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 1))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)) 1))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (/.f64 x-scale y-scale) (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale)))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (neg.f64 x-scale)) (neg.f64 y-scale)))
(/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale y-scale))
(/.f64 1 (/.f64 x-scale (.f64 y-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 1 (/.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) y-scale))
(/.f64 1 (/.f64 (.f64 x-scale (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) y-scale))
(/.f64 1 (/.f64 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale) y-scale))
(/.f64 1 (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 y-scale x-scale)))
(/.f64 1 (/.f64 (.f64 (/.f64 x-scale y-scale) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 1 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale y-scale)) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 1 (/.f64 (/.f64 x-scale y-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 1 (/.f64 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale)) (neg.f64 y-scale)))
(/.f64 1 (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (/.f64 x-scale y-scale) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (sqrt.f64 y-scale) (/.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 y-scale)))
(/.f64 (sqrt.f64 y-scale) (/.f64 (.f64 x-scale (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (sqrt.f64 y-scale)))
(/.f64 (sqrt.f64 y-scale) (/.f64 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale) (sqrt.f64 y-scale)))
(/.f64 (sqrt.f64 y-scale) (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (*.f64 (sqrt.f64 y-scale) (/.f64 1 x-scale))))
(/.f64 (sqrt.f64 y-scale) (/.f64 x-scale (.f64 (sqrt.f64 y-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (sqrt.f64 y-scale) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sqrt.f64 y-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (sqrt.f64 y-scale) (/.f64 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale)) (neg.f64 (sqrt.f64 y-scale))))
(/.f64 (sqrt.f64 y-scale) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 x-scale (sqrt.f64 y-scale))))
(/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (/.f64 y-scale x-scale))))
(/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (/.f64 x-scale y-scale) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale y-scale)) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (/.f64 x-scale y-scale) (.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 1 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(/.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(/.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 x-scale y-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(/.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (/.f64 x-scale y-scale) (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))
(/.f64 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (/.f64 (/.f64 x-scale y-scale) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (cbrt.f64 y-scale) (/.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 (cbrt.f64 y-scale) 2)))
(/.f64 (cbrt.f64 y-scale) (/.f64 (.f64 x-scale (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 y-scale) 2)))
(/.f64 (cbrt.f64 y-scale) (/.f64 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale) (pow.f64 (cbrt.f64 y-scale) 2)))
(/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 y-scale)))
(/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (.f64 x-scale (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (cbrt.f64 y-scale)))
(/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale) (cbrt.f64 y-scale)))
(/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (*.f64 (cbrt.f64 y-scale) (/.f64 1 x-scale))))
(/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 x-scale (.f64 (cbrt.f64 y-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (cbrt.f64 y-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale)) (neg.f64 (cbrt.f64 y-scale))))
(/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 x-scale (cbrt.f64 y-scale))))
(/.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2)))
(/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 (/.f64 y-scale x-scale))))
(/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (/.f64 x-scale y-scale) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2)))
(/.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale y-scale)) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2)))
(/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (/.f64 (.f64 (/.f64 x-scale y-scale) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale y-scale)) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (/.f64 (/.f64 x-scale y-scale) (.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 1 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 (/.f64 x-scale y-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(/.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale)
(/.f64 (/.f64 1 x-scale) (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) y-scale))
(/.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (/.f64 x-scale y-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (/.f64 1 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (neg.f64 y-scale) (.f64 (neg.f64 x-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (neg.f64 y-scale) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale)))
(/.f64 (neg.f64 y-scale) (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 1 (neg.f64 x-scale))))
(/.f64 (neg.f64 y-scale) (/.f64 (.f64 (neg.f64 x-scale) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (neg.f64 y-scale) (/.f64 (neg.f64 x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (neg.f64 y-scale) (/.f64 (.f64 (neg.f64 x-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 1))
(/.f64 (neg.f64 y-scale) (/.f64 (.f64 (neg.f64 x-scale) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 x-scale y-scale) (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 x-scale y-scale)))
(/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (/.f64 x-scale y-scale) (/.f64 1 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 y-scale x-scale)))
(/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 x-scale y-scale)) 1))
(/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (neg.f64 x-scale) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale)) (neg.f64 y-scale)))
(/.f64 (sqrt.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 (sqrt.f64 (.f64 y-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (.f64 y-scale (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(/.f64 (sqrt.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 x-scale (sqrt.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 (sqrt.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sqrt.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(/.f64 (sqrt.f64 (neg.f64 y-scale)) (/.f64 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale)) (sqrt.f64 (neg.f64 y-scale))))
(/.f64 (.f64 (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 (.f64 (cbrt.f64 (.f64 y-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (.f64 y-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 (.f64 y-scale (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(/.f64 (.f64 (cbrt.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 x-scale (cbrt.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 (.f64 (cbrt.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 (.f64 (cbrt.f64 (neg.f64 y-scale)) (cbrt.f64 (neg.f64 y-scale))) (/.f64 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (neg.f64 x-scale)) (cbrt.f64 (neg.f64 y-scale))))
(/.f64 (.f64 y-scale (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (.f64 y-scale (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (.f64 y-scale (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 x-scale (sqrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (.f64 y-scale (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 x-scale (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (neg.f64 y-scale)) (neg.f64 x-scale))
(/.f64 (.f64 y-scale (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 x-scale (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (.f64 (neg.f64 y-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (neg.f64 x-scale) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (neg.f64 y-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 x-scale)))
(/.f64 (/.f64 1 (sqrt.f64 x-scale)) (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 y-scale (sqrt.f64 x-scale))))
(/.f64 (/.f64 1 (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 y-scale (cbrt.f64 x-scale))))
(/.f64 (/.f64 1 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (/.f64 x-scale y-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 (/.f64 1 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (/.f64 x-scale y-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 (/.f64 y-scale 1) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))
(/.f64 (/.f64 y-scale (sqrt.f64 x-scale)) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 x-scale)))
(/.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 x-scale) 2)) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (cbrt.f64 x-scale)))
(/.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (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 (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (sqrt.f64 x-scale) y-scale)) (sqrt.f64 x-scale))
(/.f64 (/.f64 y-scale (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 x-scale))
(/.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1) (.f64 (/.f64 x-scale y-scale) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (/.f64 x-scale y-scale) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (/.f64 x-scale y-scale) (cbrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 -1 (/.f64 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale)) y-scale))
(/.f64 -1 (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 -1 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 (/.f64 x-scale y-scale))))
(/.f64 -1 (.f64 (/.f64 x-scale y-scale) (neg.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(/.f64 (neg.f64 (sqrt.f64 y-scale)) (/.f64 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale)) (sqrt.f64 y-scale)))
(/.f64 (neg.f64 (pow.f64 (cbrt.f64 y-scale) 2)) (/.f64 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale)) (cbrt.f64 y-scale)))
(/.f64 (neg.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (neg.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (.f64 (sqrt.f64 y-scale) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sqrt.f64 y-scale) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(/.f64 (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 (.f64 (sqrt.f64 y-scale) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 x-scale (.f64 (sqrt.f64 y-scale) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 (/.f64 (sqrt.f64 y-scale) 1) (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (sqrt.f64 y-scale) x-scale)))
(/.f64 (/.f64 (sqrt.f64 y-scale) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (sqrt.f64 y-scale) (cbrt.f64 x-scale))))
(/.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) 1) (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cbrt.f64 y-scale) x-scale)))
(/.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (sqrt.f64 x-scale)) (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cbrt.f64 y-scale) (sqrt.f64 x-scale))))
(/.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 (/.f64 y-scale x-scale))))
(/.f64 (/.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 1) (/.f64 (/.f64 x-scale y-scale) (/.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (/.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (/.f64 x-scale y-scale) (/.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) 1) (/.f64 (/.f64 x-scale y-scale) (/.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (/.f64 x-scale y-scale) (/.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (/.f64 x-scale y-scale) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (.f64 (neg.f64 y-scale) (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (neg.f64 x-scale) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 y-scale)) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 x-scale)))
(/.f64 (.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (neg.f64 y-scale)) (.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (neg.f64 x-scale)))
(/.f64 (.f64 (neg.f64 (/.f64 y-scale x-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (.f64 (neg.f64 y-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale))
(pow.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 1)
(pow.f64 (sqrt.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 2)
(pow.f64 (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 3)
(pow.f64 (pow.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 3) 1/3)
(sqrt.f64 (pow.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2))
(log.f64 (pow.f64 (exp.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 y-scale x-scale)))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(cbrt.f64 (pow.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 3))
(cbrt.f64 (.f64 (pow.f64 (/.f64 y-scale x-scale) 3) (pow.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 3)))
(cbrt.f64 (.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 3) (pow.f64 (/.f64 y-scale x-scale) 3)))
(expm1.f64 (log1p.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(exp.f64 (log.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(exp.f64 (.f64 (log.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 1))
(log1p.f64 (expm1.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(-.f64 (exp.f64 (log1p.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 1)
(pow.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 1)
(pow.f64 (sqrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)
(pow.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)
(pow.f64 (pow.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 3) 1/3)
(sqrt.f64 (pow.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))
(log.f64 (pow.f64 (pow.f64 (exp.f64 1/180) angle) (PI.f64)))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(cbrt.f64 (pow.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 3))
(cbrt.f64 (.f64 (pow.f64 (PI.f64) 3) (pow.f64 (.f64 1/180 angle) 3)))
(cbrt.f64 (.f64 (pow.f64 (.f64 1/180 angle) 3) (pow.f64 (PI.f64) 3)))
(expm1.f64 (log1p.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(exp.f64 (log.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(exp.f64 (.f64 (log.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 1))
(log1p.f64 (expm1.f64 (.f64 (PI.f64) (.f64 1/180 angle))))

Outputs
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 y-scale (/.f64 x-scale (.f64 angle (PI.f64)))))
(/.f64 (.f64 (.f64 1/180 (*.f64 y-scale angle)) (PI.f64)) x-scale)
(+.f64 (.f64 1/180 (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)) (.f64 (-.f64 (.f64 -1/34992000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/11664000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale))) (pow.f64 angle 3)))
(fma.f64 1/180 (/.f64 y-scale (/.f64 x-scale (.f64 angle (PI.f64)))) (.f64 (*.f64 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 3))) 1/17496000) (pow.f64 angle 3)))
(fma.f64 1/180 (.f64 (/.f64 y-scale x-scale) (.f64 angle (PI.f64))) (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) (*.f64 1/17496000 (pow.f64 angle 3))))
(+.f64 (.f64 1/180 (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)) (+.f64 (.f64 (-.f64 (.f64 -1/34992000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/11664000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale))) (pow.f64 angle 3)) (.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 5)) x-scale)) (+.f64 (.f64 1/4534963200000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 5)) x-scale)) (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/11664000 (/.f64 (*.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale))) (pow.f64 (PI.f64) 2))))))))
(fma.f64 1/180 (/.f64 y-scale (/.f64 x-scale (.f64 angle (PI.f64)))) (fma.f64 (.f64 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 3))) 1/17496000) (pow.f64 angle 3) (.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 5)))) (fma.f64 1/4534963200000 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 5))) (.f64 -1/64800 (.f64 (*.f64 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 3))) 1/17496000) (pow.f64 (PI.f64) 2))))))))
(fma.f64 1/180 (.f64 (/.f64 y-scale x-scale) (.f64 angle (PI.f64))) (fma.f64 (pow.f64 angle 5) (+.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 5)) -1/5668704000000) (.f64 1/64800 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) (.f64 1/17496000 (pow.f64 (PI.f64) 2))))) (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) (*.f64 1/17496000 (pow.f64 angle 3)))))
(fma.f64 1/180 (.f64 (/.f64 y-scale x-scale) (.f64 angle (PI.f64))) (fma.f64 (pow.f64 angle 5) (+.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 5)) -1/5668704000000) (.f64 -1/64800 (.f64 (.f64 (pow.f64 (PI.f64) 2) (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) -1/17496000))) (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) (*.f64 1/17496000 (pow.f64 angle 3)))))
(+.f64 (.f64 1/180 (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)) (+.f64 (.f64 (-.f64 (.f64 -1/34992000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/11664000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale))) (pow.f64 angle 3)) (+.f64 (.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 5)) x-scale)) (+.f64 (.f64 1/4534963200000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 5)) x-scale)) (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/11664000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale))) (pow.f64 (PI.f64) 2)))))) (.f64 (pow.f64 angle 7) (-.f64 (.f64 -1/30855889612800000000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 7)) x-scale)) (+.f64 (.f64 -1/4407984230400000000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 7)) x-scale)) (+.f64 (.f64 1/25194240000 (.f64 (-.f64 (.f64 -1/34992000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/11664000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale))) (pow.f64 (PI.f64) 4))) (.f64 -1/64800 (.f64 (-.f64 (.f64 1/22674816000000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 5)) x-scale)) (+.f64 (.f64 1/4534963200000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 5)) x-scale)) (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/11664000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale))) (pow.f64 (PI.f64) 2))))) (pow.f64 (PI.f64) 2))))))))))
(fma.f64 1/180 (/.f64 y-scale (/.f64 x-scale (.f64 angle (PI.f64)))) (fma.f64 (.f64 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 3))) 1/17496000) (pow.f64 angle 3) (fma.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 5)))) (fma.f64 1/4534963200000 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 5))) (.f64 -1/64800 (.f64 (.f64 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 3))) 1/17496000) (pow.f64 (PI.f64) 2))))) (.f64 (pow.f64 angle 7) (-.f64 (.f64 -1/30855889612800000000 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 7)))) (fma.f64 -1/4407984230400000000 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 7))) (fma.f64 1/25194240000 (.f64 (.f64 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 3))) 1/17496000) (pow.f64 (PI.f64) 4)) (.f64 (.f64 -1/64800 (-.f64 (.f64 1/22674816000000 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 5)))) (fma.f64 1/4534963200000 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 5))) (.f64 -1/64800 (.f64 (.f64 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 3))) 1/17496000) (pow.f64 (PI.f64) 2)))))) (pow.f64 (PI.f64) 2)))))))))
(fma.f64 1/180 (.f64 (/.f64 y-scale x-scale) (.f64 angle (PI.f64))) (fma.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) 1/17496000) (pow.f64 angle 3) (fma.f64 (pow.f64 angle 7) (-.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 7)) 1/5142648268800000000) (fma.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 5)) -1/5668704000000) (.f64 1/64800 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) (.f64 1/17496000 (pow.f64 (PI.f64) 2)))))) (.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) 1/17496000) (.f64 (pow.f64 (PI.f64) 4) 1/25194240000)))) (.f64 (pow.f64 angle 5) (+.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 5)) -1/5668704000000) (.f64 1/64800 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) (.f64 1/17496000 (pow.f64 (PI.f64) 2)))))))))
(fma.f64 1/180 (.f64 (/.f64 y-scale x-scale) (.f64 angle (PI.f64))) (fma.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) 1/17496000) (pow.f64 angle 3) (fma.f64 (pow.f64 angle 7) (-.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 7)) 1/5142648268800000000) (fma.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 5)) -1/5668704000000) (.f64 -1/64800 (.f64 (.f64 (pow.f64 (PI.f64) 2) (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) -1/17496000)))) (.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) 1/17496000) (.f64 (pow.f64 (PI.f64) 4) 1/25194240000)))) (.f64 (pow.f64 angle 5) (+.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 5)) -1/5668704000000) (.f64 -1/64800 (.f64 (.f64 (pow.f64 (PI.f64) 2) (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) -1/17496000)))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(-.f64 (exp.f64 (log1p.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) 1)
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(/.f64 y-scale (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(/.f64 y-scale (.f64 x-scale (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(/.f64 y-scale (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(/.f64 y-scale (/.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 1))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(/.f64 y-scale (/.f64 (.f64 x-scale (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 1))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(/.f64 y-scale (/.f64 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale) 1))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(/.f64 y-scale (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 1 x-scale)))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(/.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (/.f64 1 x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (neg.f64 y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (neg.f64 x-scale)))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (.f64 1 (/.f64 y-scale x-scale)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (/.f64 x-scale y-scale) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (/.f64 x-scale y-scale) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 1))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)) 1))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (/.f64 x-scale y-scale) (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale)))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (neg.f64 x-scale)) (neg.f64 y-scale)))
(.f64 (/.f64 (neg.f64 y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (neg.f64 x-scale)))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (.f64 1 (/.f64 y-scale x-scale)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale y-scale))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(/.f64 1 (/.f64 x-scale (.f64 y-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(/.f64 1 (/.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) y-scale))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(/.f64 1 (/.f64 (.f64 x-scale (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) y-scale))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(/.f64 1 (/.f64 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale) y-scale))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(/.f64 1 (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 y-scale x-scale)))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(/.f64 1 (/.f64 (.f64 (/.f64 x-scale y-scale) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 1 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale y-scale)) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 1 (/.f64 (/.f64 x-scale y-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(/.f64 1 (/.f64 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale)) (neg.f64 y-scale)))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(/.f64 1 (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (neg.f64 y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (neg.f64 x-scale)))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (.f64 1 (/.f64 y-scale x-scale)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (/.f64 x-scale y-scale) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (/.f64 (sqrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 x-scale y-scale)) (sqrt.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (sqrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 y-scale (/.f64 x-scale (sqrt.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (sqrt.f64 y-scale) (/.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 y-scale)))
(.f64 (/.f64 (sqrt.f64 y-scale) x-scale) (.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 y-scale)))
(/.f64 (sqrt.f64 y-scale) (/.f64 (.f64 x-scale (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (sqrt.f64 y-scale)))
(.f64 (/.f64 (sqrt.f64 y-scale) x-scale) (.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 y-scale)))
(/.f64 (sqrt.f64 y-scale) (/.f64 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale) (sqrt.f64 y-scale)))
(.f64 (/.f64 (sqrt.f64 y-scale) x-scale) (.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 y-scale)))
(/.f64 (sqrt.f64 y-scale) (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (*.f64 (sqrt.f64 y-scale) (/.f64 1 x-scale))))
(.f64 (/.f64 (sqrt.f64 y-scale) x-scale) (.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 y-scale)))
(/.f64 (sqrt.f64 y-scale) (/.f64 x-scale (.f64 (sqrt.f64 y-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (sqrt.f64 y-scale) x-scale) (.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 y-scale)))
(/.f64 (sqrt.f64 y-scale) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sqrt.f64 y-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (/.f64 (sqrt.f64 y-scale) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 y-scale)))
(.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 y-scale)) (/.f64 (/.f64 (sqrt.f64 y-scale) x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sqrt.f64 y-scale) (/.f64 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale)) (neg.f64 (sqrt.f64 y-scale))))
(.f64 (/.f64 (sqrt.f64 y-scale) (/.f64 (.f64 (neg.f64 x-scale) 1) (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (sqrt.f64 y-scale)))
(.f64 (sqrt.f64 y-scale) (.f64 (.f64 1 (/.f64 (sqrt.f64 y-scale) x-scale)) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (sqrt.f64 y-scale) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 x-scale (sqrt.f64 y-scale))))
(.f64 (/.f64 (sqrt.f64 y-scale) x-scale) (.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 y-scale)))
(/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (/.f64 y-scale x-scale))))
(.f64 (/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (/.f64 1 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 y-scale x-scale)))
(.f64 (/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) 1) (.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 (/.f64 y-scale x-scale))))
(/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 (/.f64 y-scale x-scale))))
(.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 (/.f64 y-scale x-scale))) (/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (/.f64 x-scale y-scale) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 x-scale y-scale)) (/.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale)))
(/.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale y-scale)) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 x-scale y-scale)) (/.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale)))
(/.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (/.f64 x-scale y-scale) (.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 1 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 (/.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 x-scale y-scale)) (/.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale)))
(/.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 (/.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (neg.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 x-scale y-scale))) (neg.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 1 (/.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 x-scale y-scale)))
(/.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 x-scale y-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 (/.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 x-scale y-scale)) (/.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale)))
(/.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (/.f64 x-scale y-scale) (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))
(.f64 (/.f64 (cbrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 x-scale y-scale)) (pow.f64 (cbrt.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) 2))
(.f64 (pow.f64 (cbrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 (/.f64 (cbrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) y-scale))
(/.f64 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (/.f64 (/.f64 x-scale y-scale) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (/.f64 (cbrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 x-scale y-scale)) (pow.f64 (cbrt.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) 2))
(.f64 (pow.f64 (cbrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 (/.f64 (cbrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) y-scale))
(/.f64 (cbrt.f64 y-scale) (/.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 (cbrt.f64 y-scale) 2)))
(/.f64 (cbrt.f64 y-scale) (/.f64 x-scale (.f64 (pow.f64 (cbrt.f64 y-scale) 2) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 (.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cbrt.f64 y-scale)) (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) x-scale))
(/.f64 (cbrt.f64 y-scale) (/.f64 (.f64 x-scale (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 y-scale) 2)))
(/.f64 (cbrt.f64 y-scale) (/.f64 x-scale (.f64 (pow.f64 (cbrt.f64 y-scale) 2) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 (.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cbrt.f64 y-scale)) (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) x-scale))
(/.f64 (cbrt.f64 y-scale) (/.f64 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale) (pow.f64 (cbrt.f64 y-scale) 2)))
(/.f64 (cbrt.f64 y-scale) (/.f64 x-scale (.f64 (pow.f64 (cbrt.f64 y-scale) 2) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 (.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cbrt.f64 y-scale)) (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) x-scale))
(/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 y-scale)))
(/.f64 (cbrt.f64 y-scale) (/.f64 x-scale (.f64 (pow.f64 (cbrt.f64 y-scale) 2) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 (.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cbrt.f64 y-scale)) (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) x-scale))
(/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (.f64 x-scale (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (cbrt.f64 y-scale)))
(/.f64 (cbrt.f64 y-scale) (/.f64 x-scale (.f64 (pow.f64 (cbrt.f64 y-scale) 2) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 (.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cbrt.f64 y-scale)) (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) x-scale))
(/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale) (cbrt.f64 y-scale)))
(/.f64 (cbrt.f64 y-scale) (/.f64 x-scale (.f64 (pow.f64 (cbrt.f64 y-scale) 2) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 (.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cbrt.f64 y-scale)) (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) x-scale))
(/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (*.f64 (cbrt.f64 y-scale) (/.f64 1 x-scale))))
(/.f64 (cbrt.f64 y-scale) (/.f64 x-scale (.f64 (pow.f64 (cbrt.f64 y-scale) 2) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 (.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cbrt.f64 y-scale)) (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) x-scale))
(/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 x-scale (.f64 (cbrt.f64 y-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (cbrt.f64 y-scale) (/.f64 x-scale (.f64 (pow.f64 (cbrt.f64 y-scale) 2) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 (.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cbrt.f64 y-scale)) (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) x-scale))
(/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (cbrt.f64 y-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (cbrt.f64 y-scale)))
(.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (cbrt.f64 y-scale))))
(/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale)) (neg.f64 (cbrt.f64 y-scale))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (.f64 (neg.f64 x-scale) 1) (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (cbrt.f64 y-scale)))
(.f64 (.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 (cbrt.f64 y-scale) 2)) (*.f64 1 (/.f64 (cbrt.f64 y-scale) x-scale)))
(/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 x-scale (cbrt.f64 y-scale))))
(/.f64 (cbrt.f64 y-scale) (/.f64 x-scale (.f64 (pow.f64 (cbrt.f64 y-scale) 2) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 (.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cbrt.f64 y-scale)) (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) x-scale))
(/.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2)))
(.f64 (/.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (/.f64 1 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))) (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2))
(.f64 (/.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 1) (.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2)))
(/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 (/.f64 y-scale x-scale))))
(.f64 (/.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (/.f64 1 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))) (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2))
(.f64 (/.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 1) (.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2)))
(/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cbrt.f64 (/.f64 y-scale x-scale))))
(.f64 (.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cbrt.f64 (/.f64 y-scale x-scale))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (/.f64 x-scale y-scale) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2)))
(.f64 (/.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale y-scale))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (/.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale))))
(/.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale y-scale)) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2)))
(.f64 (/.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale y-scale))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (/.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale))))
(/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (/.f64 (.f64 (/.f64 x-scale y-scale) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale y-scale))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (/.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale))))
(/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale y-scale)) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale y-scale))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (/.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale))))
(/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (/.f64 (/.f64 x-scale y-scale) (.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 1 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 (/.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale y-scale))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (/.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale))))
(/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 (neg.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 x-scale y-scale))) (neg.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 1 (/.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 (/.f64 x-scale y-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 (/.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale y-scale))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (/.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale)
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(/.f64 (/.f64 1 x-scale) (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) y-scale))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(/.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (/.f64 x-scale y-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (/.f64 1 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (neg.f64 y-scale) (.f64 (neg.f64 x-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(/.f64 (neg.f64 y-scale) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale)))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(/.f64 (neg.f64 y-scale) (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 1 (neg.f64 x-scale))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(/.f64 (neg.f64 y-scale) (/.f64 (.f64 (neg.f64 x-scale) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 (neg.f64 y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (neg.f64 x-scale)))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (.f64 1 (/.f64 y-scale x-scale)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (neg.f64 y-scale) (/.f64 (neg.f64 x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(/.f64 (neg.f64 y-scale) (/.f64 (.f64 (neg.f64 x-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 1))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(/.f64 (neg.f64 y-scale) (/.f64 (.f64 (neg.f64 x-scale) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 x-scale y-scale) (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (neg.f64 y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (neg.f64 x-scale)))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (.f64 1 (/.f64 y-scale x-scale)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 x-scale y-scale)))
(.f64 (/.f64 (neg.f64 y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (neg.f64 x-scale)))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (.f64 1 (/.f64 y-scale x-scale)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (/.f64 x-scale y-scale) (/.f64 1 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(.f64 (/.f64 (neg.f64 y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (neg.f64 x-scale)))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (.f64 1 (/.f64 y-scale x-scale)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 y-scale x-scale)))
(.f64 (/.f64 (neg.f64 y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (neg.f64 x-scale)))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (.f64 1 (/.f64 y-scale x-scale)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 x-scale y-scale)) 1))
(.f64 (/.f64 (neg.f64 y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (neg.f64 x-scale)))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (.f64 1 (/.f64 y-scale x-scale)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (neg.f64 x-scale) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(.f64 (/.f64 (neg.f64 y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (neg.f64 x-scale)))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (.f64 1 (/.f64 y-scale x-scale)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale)) (neg.f64 y-scale)))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (sqrt.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(.f64 (/.f64 (sqrt.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sqrt.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 (sqrt.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (sqrt.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (sqrt.f64 (.f64 y-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (.f64 y-scale (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 (/.f64 (sqrt.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 (sqrt.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sqrt.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 x-scale (sqrt.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(.f64 (/.f64 (sqrt.f64 (.f64 y-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale) (sqrt.f64 (.f64 y-scale (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 (sqrt.f64 (.f64 y-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (sqrt.f64 (.f64 y-scale (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale))
(/.f64 (sqrt.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sqrt.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 (/.f64 (sqrt.f64 (neg.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 (neg.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 x-scale y-scale))) (sqrt.f64 (neg.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 (sqrt.f64 (neg.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (neg.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 x-scale (/.f64 (neg.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) y-scale)))
(/.f64 (sqrt.f64 (neg.f64 y-scale)) (/.f64 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale)) (sqrt.f64 (neg.f64 y-scale))))
(/.f64 (sqrt.f64 (neg.f64 y-scale)) (/.f64 (/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 (neg.f64 y-scale)) (neg.f64 x-scale))))
(.f64 (sqrt.f64 (neg.f64 y-scale)) (.f64 (/.f64 (sqrt.f64 (neg.f64 y-scale)) (neg.f64 x-scale)) (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(.f64 (/.f64 (.f64 (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(/.f64 (.f64 (cbrt.f64 (.f64 y-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (.f64 y-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 (.f64 y-scale (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 (/.f64 (.f64 (cbrt.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cbrt.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cbrt.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(.f64 (cbrt.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 (/.f64 (cbrt.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (cbrt.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)))
(/.f64 (.f64 (cbrt.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 x-scale (cbrt.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 (cbrt.f64 (.f64 y-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (/.f64 x-scale (cbrt.f64 (.f64 y-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (cbrt.f64 (.f64 y-scale (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 (cbrt.f64 (.f64 y-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (cbrt.f64 (.f64 y-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 x-scale (cbrt.f64 (.f64 y-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(/.f64 (.f64 (cbrt.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 (.f64 (cbrt.f64 (neg.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cbrt.f64 (neg.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (neg.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 x-scale y-scale)) (cbrt.f64 (neg.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 (/.f64 (.f64 (cbrt.f64 (neg.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cbrt.f64 (neg.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 x-scale y-scale)) (/.f64 (cbrt.f64 (neg.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 (cbrt.f64 (neg.f64 y-scale)) (cbrt.f64 (neg.f64 y-scale))) (/.f64 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (neg.f64 x-scale)) (cbrt.f64 (neg.f64 y-scale))))
(/.f64 (.f64 (cbrt.f64 (neg.f64 y-scale)) (cbrt.f64 (neg.f64 y-scale))) (/.f64 (/.f64 (.f64 (neg.f64 x-scale) 1) (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cbrt.f64 (neg.f64 y-scale))))
(.f64 (cbrt.f64 (neg.f64 y-scale)) (.f64 (/.f64 (.f64 (cbrt.f64 (neg.f64 y-scale)) (cbrt.f64 (neg.f64 y-scale))) (neg.f64 x-scale)) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (/.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 x-scale y-scale)) (/.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale)))
(/.f64 (.f64 y-scale (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (/.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale y-scale))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (/.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 x-scale y-scale)) (/.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale)))
(/.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale y-scale))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (/.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale))))
(/.f64 (.f64 y-scale (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 x-scale (sqrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (sqrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 x-scale y-scale)) (sqrt.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (sqrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 y-scale (/.f64 x-scale (sqrt.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 y-scale (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 x-scale (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (cbrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 x-scale y-scale)) (pow.f64 (cbrt.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) 2))
(.f64 (pow.f64 (cbrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 (/.f64 (cbrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) y-scale))
(/.f64 (.f64 (/.f64 y-scale x-scale) (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 (neg.f64 y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (neg.f64 x-scale)))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (.f64 1 (/.f64 y-scale x-scale)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (neg.f64 y-scale)) (neg.f64 x-scale))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(/.f64 (.f64 y-scale (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 x-scale (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (/.f64 (neg.f64 y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (neg.f64 x-scale)))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (.f64 1 (/.f64 y-scale x-scale)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 (neg.f64 y-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (neg.f64 x-scale) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (/.f64 (neg.f64 y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (neg.f64 x-scale)))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (.f64 1 (/.f64 y-scale x-scale)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 (neg.f64 y-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 x-scale)))
(.f64 (/.f64 (neg.f64 y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (neg.f64 x-scale)))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (.f64 1 (/.f64 y-scale x-scale)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 1 (sqrt.f64 x-scale)) (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 y-scale (sqrt.f64 x-scale))))
(.f64 (/.f64 (/.f64 1 (sqrt.f64 x-scale)) (/.f64 1 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))) (/.f64 y-scale (sqrt.f64 x-scale)))
(.f64 (/.f64 y-scale (sqrt.f64 x-scale)) (/.f64 1 (/.f64 (sqrt.f64 x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(/.f64 (/.f64 1 (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 y-scale (cbrt.f64 x-scale))))
(.f64 (/.f64 (/.f64 1 (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 1 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))) (/.f64 y-scale (cbrt.f64 x-scale)))
(/.f64 1 (.f64 (pow.f64 (cbrt.f64 x-scale) 2) (/.f64 (cbrt.f64 x-scale) (.f64 y-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(/.f64 (/.f64 1 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (/.f64 x-scale y-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(.f64 (/.f64 (/.f64 1 (sqrt.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 x-scale y-scale)) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 1 (.f64 (/.f64 x-scale y-scale) (sqrt.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(/.f64 (/.f64 1 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (/.f64 x-scale y-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (/.f64 y-scale 1) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(/.f64 (/.f64 y-scale (sqrt.f64 x-scale)) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 x-scale)))
(/.f64 (/.f64 y-scale (sqrt.f64 x-scale)) (/.f64 (.f64 1 (sqrt.f64 x-scale)) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (/.f64 y-scale (sqrt.f64 x-scale)) (sqrt.f64 x-scale)) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(/.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 x-scale) 2)) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (cbrt.f64 x-scale)))
(/.f64 y-scale (.f64 (.f64 (/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cbrt.f64 x-scale)) (pow.f64 (cbrt.f64 x-scale) 2)))
(.f64 (/.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 x-scale) 2)) (cbrt.f64 x-scale)) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(/.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (/.f64 y-scale x-scale) (.f64 (sqrt.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(/.f64 (/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (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 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (sqrt.f64 x-scale) y-scale)) (sqrt.f64 x-scale))
(/.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 x-scale) (/.f64 (sqrt.f64 x-scale) y-scale)))
(/.f64 (/.f64 y-scale (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 x-scale))
(/.f64 y-scale (.f64 (.f64 (/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cbrt.f64 x-scale)) (pow.f64 (cbrt.f64 x-scale) 2)))
(.f64 (/.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 x-scale) 2)) (cbrt.f64 x-scale)) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(/.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1) (.f64 (/.f64 x-scale y-scale) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (/.f64 x-scale y-scale) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (.f64 (/.f64 x-scale y-scale) (sqrt.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(.f64 (/.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (sqrt.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) y-scale)
(/.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (/.f64 x-scale y-scale) (cbrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 -1 (/.f64 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale)) y-scale))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(/.f64 -1 (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 (neg.f64 y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (neg.f64 x-scale)))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (.f64 1 (/.f64 y-scale x-scale)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 -1 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 (/.f64 x-scale y-scale))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(/.f64 -1 (.f64 (/.f64 x-scale y-scale) (neg.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(/.f64 (neg.f64 (sqrt.f64 y-scale)) (/.f64 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale)) (sqrt.f64 y-scale)))
(.f64 (/.f64 (sqrt.f64 y-scale) (/.f64 (.f64 (neg.f64 x-scale) 1) (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (sqrt.f64 y-scale)))
(.f64 (sqrt.f64 y-scale) (.f64 (.f64 1 (/.f64 (sqrt.f64 y-scale) x-scale)) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (neg.f64 (pow.f64 (cbrt.f64 y-scale) 2)) (/.f64 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale)) (cbrt.f64 y-scale)))
(.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (.f64 (neg.f64 x-scale) 1) (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (cbrt.f64 y-scale)))
(.f64 (.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 (cbrt.f64 y-scale) 2)) (*.f64 1 (/.f64 (cbrt.f64 y-scale) x-scale)))
(/.f64 (neg.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (neg.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 x-scale y-scale))) (neg.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 1 (/.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 x-scale y-scale)))
(/.f64 (neg.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (.f64 (/.f64 x-scale y-scale) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 (neg.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 x-scale y-scale))) (neg.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 1 (/.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(/.f64 (.f64 (sqrt.f64 y-scale) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sqrt.f64 y-scale) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 (/.f64 (.f64 (sqrt.f64 y-scale) (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 (sqrt.f64 y-scale) (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(.f64 (/.f64 (.f64 (sqrt.f64 y-scale) (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale) (/.f64 (sqrt.f64 y-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(/.f64 (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(.f64 (/.f64 (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (sqrt.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 (/.f64 y-scale x-scale)))))
(/.f64 (.f64 (sqrt.f64 y-scale) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 x-scale (.f64 (sqrt.f64 y-scale) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(.f64 (/.f64 (.f64 (sqrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sqrt.f64 y-scale)) x-scale) (.f64 (sqrt.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (sqrt.f64 y-scale)))
(.f64 (.f64 (sqrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sqrt.f64 y-scale)) (/.f64 (sqrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 x-scale (sqrt.f64 y-scale))))
(/.f64 (/.f64 (sqrt.f64 y-scale) 1) (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (sqrt.f64 y-scale) x-scale)))
(.f64 (/.f64 (sqrt.f64 y-scale) x-scale) (.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 y-scale)))
(/.f64 (/.f64 (sqrt.f64 y-scale) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (sqrt.f64 y-scale) (cbrt.f64 x-scale))))
(.f64 (/.f64 (/.f64 (sqrt.f64 y-scale) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 1 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))) (/.f64 (sqrt.f64 y-scale) (cbrt.f64 x-scale)))
(/.f64 (/.f64 (sqrt.f64 y-scale) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (/.f64 (cbrt.f64 x-scale) (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sqrt.f64 y-scale)))
(/.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) 1) (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cbrt.f64 y-scale) x-scale)))
(/.f64 (cbrt.f64 y-scale) (/.f64 x-scale (.f64 (pow.f64 (cbrt.f64 y-scale) 2) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 (.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cbrt.f64 y-scale)) (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) x-scale))
(/.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (sqrt.f64 x-scale)) (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cbrt.f64 y-scale) (sqrt.f64 x-scale))))
(.f64 (/.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (sqrt.f64 x-scale)) (/.f64 1 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))) (/.f64 (cbrt.f64 y-scale) (sqrt.f64 x-scale)))
(.f64 (/.f64 (cbrt.f64 y-scale) (sqrt.f64 x-scale)) (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (sqrt.f64 x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(/.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 (/.f64 y-scale x-scale))))
(/.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cbrt.f64 (/.f64 y-scale x-scale))))
(.f64 (/.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (pow.f64 (cbrt.f64 x-scale) 2)) 1) (.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cbrt.f64 (/.f64 y-scale x-scale))))
(/.f64 (/.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 1) (/.f64 (/.f64 x-scale y-scale) (/.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (/.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 x-scale y-scale)) (/.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale)))
(/.f64 (/.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (/.f64 x-scale y-scale) (/.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(.f64 (/.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 x-scale y-scale)) (/.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale)))
(/.f64 (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) 1) (/.f64 (/.f64 x-scale y-scale) (/.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (/.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale y-scale))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (/.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) y-scale))))
(/.f64 (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (/.f64 x-scale y-scale) (/.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (/.f64 (.f64 (/.f64 x-scale y-scale) (sqrt.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (/.f64 x-scale y-scale) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 (/.f64 x-scale (.f64 (cbrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) y-scale)) (pow.f64 (cbrt.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)))
(.f64 (cbrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 (/.f64 x-scale y-scale) (pow.f64 (cbrt.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))
(/.f64 (.f64 (neg.f64 y-scale) (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (neg.f64 x-scale) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 y-scale)) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 x-scale)))
(.f64 (/.f64 (neg.f64 y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (neg.f64 x-scale)))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (.f64 1 (/.f64 y-scale x-scale)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (neg.f64 y-scale)) (.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (neg.f64 x-scale)))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(/.f64 (.f64 (neg.f64 (/.f64 y-scale x-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 (neg.f64 y-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (neg.f64 x-scale)))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (.f64 1 (/.f64 y-scale x-scale)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 (neg.f64 y-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(pow.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 1)
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(pow.f64 (sqrt.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 2)
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(pow.f64 (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 3)
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(pow.f64 (pow.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 3) 1/3)
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(sqrt.f64 (pow.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2))
(sqrt.f64 (pow.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) 2))
(fabs.f64 (.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale)))
(log.f64 (pow.f64 (exp.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 y-scale x-scale)))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(cbrt.f64 (pow.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 3))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(cbrt.f64 (.f64 (pow.f64 (/.f64 y-scale x-scale) 3) (pow.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 3)))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(cbrt.f64 (.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 3) (pow.f64 (/.f64 y-scale x-scale) 3)))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(expm1.f64 (log1p.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(exp.f64 (log.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(exp.f64 (.f64 (log.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 1))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(log1p.f64 (expm1.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(-.f64 (exp.f64 (log1p.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 1)
(.f64 1/180 (.f64 angle (PI.f64)))
(pow.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 1)
(.f64 1/180 (.f64 angle (PI.f64)))
(pow.f64 (sqrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)
(.f64 1/180 (.f64 angle (PI.f64)))
(pow.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)
(.f64 1/180 (.f64 angle (PI.f64)))
(pow.f64 (pow.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 3) 1/3)
(.f64 1/180 (.f64 angle (PI.f64)))
(sqrt.f64 (pow.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))
(sqrt.f64 (pow.f64 (.f64 1/180 (.f64 angle (PI.f64))) 2))
(fabs.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(log.f64 (pow.f64 (pow.f64 (exp.f64 1/180) angle) (PI.f64)))
(*.f64 (PI.f64) (log.f64 (pow.f64 (exp.f64 1/180) angle)))
(.f64 (PI.f64) (.f64 angle (log.f64 (exp.f64 1/180))))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 1/180 (.f64 angle (PI.f64)))
(cbrt.f64 (pow.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 3))
(.f64 1/180 (.f64 angle (PI.f64)))
(cbrt.f64 (.f64 (pow.f64 (PI.f64) 3) (pow.f64 (.f64 1/180 angle) 3)))
(.f64 1/180 (.f64 angle (PI.f64)))
(cbrt.f64 (.f64 (pow.f64 (.f64 1/180 angle) 3) (pow.f64 (PI.f64) 3)))
(.f64 1/180 (.f64 angle (PI.f64)))
(expm1.f64 (log1p.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(.f64 1/180 (.f64 angle (PI.f64)))
(exp.f64 (log.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(.f64 1/180 (.f64 angle (PI.f64)))
(exp.f64 (.f64 (log.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 1))
(.f64 1/180 (.f64 angle (PI.f64)))
(log1p.f64 (expm1.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(.f64 1/180 (.f64 angle (PI.f64)))

localize29.0ms (0%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	99.7%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64))))))) (PI.f64)))
✓	99.7%	(.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))
✓	99.6%	(*.f64 angle (PI.f64))
✓	92.5%	(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))

Compiler

Compiled 89 to 37 computations (58.4% saved)

series18.0ms (0%)

Counts

4 → 72

Calls

30 calls:

Time	Variable		Point	Expression
2.0ms	x-scale	@	-inf	(.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))
2.0ms	angle	@	-inf	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64))))))) (PI.f64)))
1.0ms	x-scale	@	inf	(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
1.0ms	x-scale	@	-inf	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64))))))) (PI.f64)))
1.0ms	angle	@	inf	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64))))))) (PI.f64)))

rewrite135.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

456×	`distribute-lft-neg-in`
408×	`distribute-rgt-neg-in`
400×	`add-sqr-sqrt`
386×	`pow1`
386×	`*-un-lft-identity`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	19	102
1	398	102
2	5086	102

Stop Event

1×	node limit

Counts

4 → 112

Calls

Call 1

Inputs
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(*.f64 angle (PI.f64))
(.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64))))))) (PI.f64)))

Outputs
(((-.f64 (exp.f64 (log1p.f64 (/.f64 (/.f64 x-scale y-scale) (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((.f64 x-scale (/.f64 (/.f64 1 y-scale) (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((.f64 (/.f64 (/.f64 x-scale y-scale) (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((.f64 1 (/.f64 (/.f64 x-scale y-scale) (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((.f64 (sqrt.f64 x-scale) (.f64 (sqrt.f64 x-scale) (/.f64 (/.f64 1 y-scale) (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((.f64 (sqrt.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64)))) (sqrt.f64 (/.f64 (/.f64 x-scale y-scale) (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((.f64 (pow.f64 (cbrt.f64 x-scale) 2) (.f64 (cbrt.f64 x-scale) (/.f64 (/.f64 1 y-scale) (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((.f64 (cbrt.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64)))) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale y-scale) (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((.f64 (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) 2)) (cbrt.f64 (/.f64 (/.f64 x-scale y-scale) (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((.f64 (/.f64 x-scale y-scale) (/.f64 1 (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((.f64 (/.f64 (/.f64 1 y-scale) (.f64 angle (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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((.f64 (neg.f64 x-scale) (/.f64 1 (.f64 y-scale (.f64 (PI.f64) (neg.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 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((.f64 (/.f64 1 y-scale) (/.f64 x-scale (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((.f64 (/.f64 1 (.f64 angle (PI.f64))) (/.f64 x-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 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((.f64 (/.f64 1 (sqrt.f64 (.f64 y-scale (.f64 angle (PI.f64))))) (/.f64 x-scale (sqrt.f64 (.f64 y-scale (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((.f64 (/.f64 1 (pow.f64 (cbrt.f64 (.f64 y-scale (.f64 angle (PI.f64)))) 2)) (/.f64 x-scale (cbrt.f64 (.f64 y-scale (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((.f64 (/.f64 1 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((.f64 (/.f64 1 (.f64 y-scale (.f64 (PI.f64) (neg.f64 angle)))) (neg.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((.f64 (/.f64 (sqrt.f64 x-scale) 1) (/.f64 (sqrt.f64 x-scale) (.f64 y-scale (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((.f64 (/.f64 (sqrt.f64 x-scale) y-scale) (/.f64 (sqrt.f64 x-scale) (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) 1) (/.f64 (cbrt.f64 x-scale) (.f64 y-scale (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((.f64 (/.f64 (sqrt.f64 x-scale) (.f64 angle (PI.f64))) (/.f64 (sqrt.f64 x-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 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((.f64 (/.f64 (sqrt.f64 x-scale) (.f64 y-scale (.f64 angle (PI.f64)))) (sqrt.f64 x-scale)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((.f64 (/.f64 (sqrt.f64 x-scale) (pow.f64 (cbrt.f64 (.f64 y-scale (.f64 angle (PI.f64)))) 2)) (/.f64 (sqrt.f64 x-scale) (cbrt.f64 (.f64 y-scale (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((.f64 (/.f64 (sqrt.f64 x-scale) (.f64 y-scale angle)) (/.f64 (sqrt.f64 x-scale) (PI.f64))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) y-scale) (/.f64 (cbrt.f64 x-scale) (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (.f64 angle (PI.f64))) (/.f64 (cbrt.f64 x-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 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (sqrt.f64 (.f64 y-scale (.f64 angle (PI.f64))))) (/.f64 (cbrt.f64 x-scale) (sqrt.f64 (.f64 y-scale (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (pow.f64 (cbrt.f64 (.f64 y-scale (.f64 angle (PI.f64)))) 2)) (cbrt.f64 (/.f64 (/.f64 x-scale y-scale) (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (.f64 y-scale angle)) (/.f64 (cbrt.f64 x-scale) (PI.f64))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((.f64 (/.f64 1 (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) (sqrt.f64 x-scale))) (sqrt.f64 x-scale)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((.f64 (/.f64 1 (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) (pow.f64 (cbrt.f64 x-scale) 2))) (cbrt.f64 x-scale)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (.f64 y-scale (.f64 angle (PI.f64)))) (cbrt.f64 x-scale)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((pow.f64 (/.f64 (/.f64 x-scale y-scale) (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((pow.f64 (sqrt.f64 (/.f64 (/.f64 x-scale y-scale) (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((pow.f64 (cbrt.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64)))) 3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((pow.f64 (pow.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) 3) 1/3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((pow.f64 (/.f64 (.f64 angle (PI.f64)) (/.f64 x-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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((neg.f64 (/.f64 x-scale (.f64 y-scale (.f64 (PI.f64) (neg.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 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((neg.f64 (.f64 (/.f64 x-scale (.f64 y-scale (.f64 (PI.f64) (neg.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 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((neg.f64 (.f64 x-scale (/.f64 1 (.f64 y-scale (.f64 (PI.f64) (neg.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 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((neg.f64 (.f64 1 (/.f64 x-scale (.f64 y-scale (.f64 (PI.f64) (neg.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 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((neg.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 (PI.f64) (neg.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 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((neg.f64 (/.f64 (neg.f64 x-scale) (.f64 y-scale (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((sqrt.f64 (pow.f64 (/.f64 (/.f64 x-scale y-scale) (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((log.f64 (exp.f64 (/.f64 (/.f64 x-scale y-scale) (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (/.f64 (/.f64 x-scale y-scale) (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) 3)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((cbrt.f64 (/.f64 (pow.f64 x-scale 3) (pow.f64 (.f64 y-scale (.f64 angle (PI.f64))) 3))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((expm1.f64 (log1p.f64 (/.f64 (/.f64 x-scale y-scale) (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((exp.f64 (log.f64 (/.f64 (/.f64 x-scale y-scale) (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((exp.f64 (.f64 (log.f64 (/.f64 (/.f64 x-scale y-scale) (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((log1p.f64 (expm1.f64 (/.f64 (/.f64 x-scale y-scale) (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((pow.f64 (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((pow.f64 (sqrt.f64 (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((pow.f64 (cbrt.f64 (.f64 angle (PI.f64))) 3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((pow.f64 (pow.f64 (.f64 angle (PI.f64)) 3) 1/3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((sqrt.f64 (pow.f64 (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((log.f64 (pow.f64 (exp.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((cbrt.f64 (pow.f64 (.f64 angle (PI.f64)) 3)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((cbrt.f64 (.f64 (pow.f64 angle 3) (pow.f64 (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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((cbrt.f64 (.f64 (pow.f64 (PI.f64) 3) (pow.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 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((expm1.f64 (log1p.f64 (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((exp.f64 (log.f64 (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((exp.f64 (.f64 (log.f64 (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((log1p.f64 (expm1.f64 (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64))))))) (PI.f64)))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((/.f64 -180 (/.f64 (.f64 angle (PI.f64)) (/.f64 x-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 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((/.f64 (.f64 -180 x-scale) (.f64 y-scale (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((/.f64 (.f64 90 (.f64 x-scale -2)) (.f64 y-scale (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((/.f64 (.f64 -180 (/.f64 x-scale y-scale)) (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((/.f64 (.f64 -180 (neg.f64 x-scale)) (.f64 y-scale (.f64 (PI.f64) (neg.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 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((/.f64 (.f64 (.f64 x-scale -2) 90) (.f64 y-scale (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((pow.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((pow.f64 (sqrt.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((pow.f64 (cbrt.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((pow.f64 (pow.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((neg.f64 (.f64 (/.f64 x-scale (.f64 y-scale (.f64 (PI.f64) (neg.f64 angle)))) -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 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((neg.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 (PI.f64) (neg.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 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((sqrt.f64 (.f64 32400 (pow.f64 (/.f64 (/.f64 x-scale y-scale) (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((log.f64 (pow.f64 (exp.f64 -180) (/.f64 (/.f64 x-scale y-scale) (.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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((cbrt.f64 (pow.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((expm1.f64 (log1p.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((exp.f64 (log.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((exp.f64 (.f64 (log.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180)) 1)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((log1p.f64 (expm1.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64))))))) (PI.f64)))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180))))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((/.f64 180 (/.f64 (PI.f64) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((/.f64 1 (/.f64 (PI.f64) (.f64 180 (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((/.f64 (.f64 180 (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180))) (PI.f64)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((/.f64 (/.f64 (.f64 180 (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180))) 1) (PI.f64)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((/.f64 (/.f64 (.f64 180 (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((/.f64 (/.f64 (.f64 180 (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180))) (cbrt.f64 (pow.f64 (PI.f64) 2))) (cbrt.f64 (PI.f64))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((/.f64 (.f64 (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180)) -180) (neg.f64 (PI.f64))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((pow.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((pow.f64 (sqrt.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((pow.f64 (cbrt.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((pow.f64 (pow.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((neg.f64 (.f64 (/.f64 (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180)) (neg.f64 (PI.f64))) 180)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((neg.f64 (.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180)) (neg.f64 (PI.f64))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((neg.f64 (/.f64 (.f64 180 (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180))) (neg.f64 (PI.f64)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((sqrt.f64 (pow.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((log.f64 (pow.f64 (exp.f64 180) (/.f64 (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180)) (PI.f64)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((cbrt.f64 (pow.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -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>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((expm1.f64 (log1p.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((exp.f64 (log.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((exp.f64 (.f64 (log.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180)))) 1)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)) ((log1p.f64 (expm1.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 angle (PI.f64)) (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))) (PI.f64)))) #f)))

simplify97.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

1408×	`associate-/l/`
1108×	`distribute-lft-in`
1106×	`distribute-rgt-in`
928×	`associate-/r/`
468×	`associate-/r*`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	278	5868
1	701	5814
2	3585	5814

Stop Event

1×	node limit

Counts

184 → 148

Calls

Call 1

Inputs
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(-.f64 (exp.f64 (log1p.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))))) 1)
(.f64 x-scale (/.f64 (/.f64 1 y-scale) (.f64 angle (PI.f64))))
(.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) 1)
(.f64 1 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))))
(.f64 (sqrt.f64 x-scale) (.f64 (sqrt.f64 x-scale) (/.f64 (/.f64 1 y-scale) (*.f64 angle (PI.f64)))))
(.f64 (sqrt.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64)))) (sqrt.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))))
(.f64 (pow.f64 (cbrt.f64 x-scale) 2) (.f64 (cbrt.f64 x-scale) (/.f64 (/.f64 1 y-scale) (*.f64 angle (PI.f64)))))
(.f64 (cbrt.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64)))) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) 2)))
(.f64 (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) 2)) (cbrt.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))))
(.f64 (/.f64 x-scale y-scale) (/.f64 1 (.f64 angle (PI.f64))))
(.f64 (/.f64 (/.f64 1 y-scale) (.f64 angle (PI.f64))) x-scale)
(.f64 (neg.f64 x-scale) (/.f64 1 (.f64 y-scale (*.f64 (PI.f64) (neg.f64 angle)))))
(.f64 (/.f64 1 y-scale) (/.f64 x-scale (.f64 angle (PI.f64))))
(.f64 (/.f64 1 (.f64 angle (PI.f64))) (/.f64 x-scale y-scale))
(.f64 (/.f64 1 (sqrt.f64 (.f64 y-scale (.f64 angle (PI.f64))))) (/.f64 x-scale (sqrt.f64 (.f64 y-scale (*.f64 angle (PI.f64))))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (.f64 y-scale (.f64 angle (PI.f64)))) 2)) (/.f64 x-scale (cbrt.f64 (.f64 y-scale (*.f64 angle (PI.f64))))))
(.f64 (/.f64 1 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 (/.f64 1 (.f64 y-scale (*.f64 (PI.f64) (neg.f64 angle)))) (neg.f64 x-scale))
(.f64 (/.f64 (sqrt.f64 x-scale) 1) (/.f64 (sqrt.f64 x-scale) (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 (/.f64 (sqrt.f64 x-scale) y-scale) (/.f64 (sqrt.f64 x-scale) (.f64 angle (PI.f64))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) 1) (/.f64 (cbrt.f64 x-scale) (.f64 y-scale (*.f64 angle (PI.f64)))))
(.f64 (/.f64 (sqrt.f64 x-scale) (.f64 angle (PI.f64))) (/.f64 (sqrt.f64 x-scale) y-scale))
(.f64 (/.f64 (sqrt.f64 x-scale) (.f64 y-scale (*.f64 angle (PI.f64)))) (sqrt.f64 x-scale))
(.f64 (/.f64 (sqrt.f64 x-scale) (pow.f64 (cbrt.f64 (.f64 y-scale (.f64 angle (PI.f64)))) 2)) (/.f64 (sqrt.f64 x-scale) (cbrt.f64 (.f64 y-scale (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (sqrt.f64 x-scale) (.f64 y-scale angle)) (/.f64 (sqrt.f64 x-scale) (PI.f64)))
(.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) y-scale) (/.f64 (cbrt.f64 x-scale) (.f64 angle (PI.f64))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (.f64 angle (PI.f64))) (/.f64 (cbrt.f64 x-scale) y-scale))
(.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (sqrt.f64 (.f64 y-scale (.f64 angle (PI.f64))))) (/.f64 (cbrt.f64 x-scale) (sqrt.f64 (.f64 y-scale (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (pow.f64 (cbrt.f64 (.f64 y-scale (.f64 angle (PI.f64)))) 2)) (cbrt.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (.f64 y-scale angle)) (/.f64 (cbrt.f64 x-scale) (PI.f64)))
(.f64 (/.f64 1 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) (sqrt.f64 x-scale))) (sqrt.f64 x-scale))
(.f64 (/.f64 1 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) (pow.f64 (cbrt.f64 x-scale) 2))) (cbrt.f64 x-scale))
(.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (.f64 y-scale (*.f64 angle (PI.f64)))) (cbrt.f64 x-scale))
(pow.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) 1)
(pow.f64 (sqrt.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))) 2)
(pow.f64 (cbrt.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))) 3)
(pow.f64 (pow.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) 3) 1/3)
(pow.f64 (/.f64 (*.f64 angle (PI.f64)) (/.f64 x-scale y-scale)) -1)
(neg.f64 (/.f64 x-scale (.f64 y-scale (.f64 (PI.f64) (neg.f64 angle)))))
(neg.f64 (.f64 (/.f64 x-scale (.f64 y-scale (*.f64 (PI.f64) (neg.f64 angle)))) 1))
(neg.f64 (.f64 x-scale (/.f64 1 (.f64 y-scale (*.f64 (PI.f64) (neg.f64 angle))))))
(neg.f64 (.f64 1 (/.f64 x-scale (.f64 y-scale (*.f64 (PI.f64) (neg.f64 angle))))))
(neg.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 (PI.f64) (neg.f64 angle))))
(neg.f64 (/.f64 (neg.f64 x-scale) (.f64 y-scale (.f64 angle (PI.f64)))))
(sqrt.f64 (pow.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) 2))
(log.f64 (exp.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))))
(log.f64 (+.f64 1 (expm1.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))))))
(cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) 3))
(cbrt.f64 (/.f64 (pow.f64 x-scale 3) (pow.f64 (.f64 y-scale (.f64 angle (PI.f64))) 3)))
(expm1.f64 (log1p.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))))
(exp.f64 (log.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))))
(exp.f64 (.f64 (log.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64)))) 1))
(log1p.f64 (expm1.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))))
(-.f64 (exp.f64 (log1p.f64 (*.f64 angle (PI.f64)))) 1)
(pow.f64 (*.f64 angle (PI.f64)) 1)
(pow.f64 (sqrt.f64 (*.f64 angle (PI.f64))) 2)
(pow.f64 (cbrt.f64 (*.f64 angle (PI.f64))) 3)
(pow.f64 (pow.f64 (*.f64 angle (PI.f64)) 3) 1/3)
(sqrt.f64 (pow.f64 (*.f64 angle (PI.f64)) 2))
(log.f64 (pow.f64 (exp.f64 angle) (PI.f64)))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 angle (PI.f64)))))
(cbrt.f64 (pow.f64 (*.f64 angle (PI.f64)) 3))
(cbrt.f64 (*.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)))
(cbrt.f64 (*.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)))
(expm1.f64 (log1p.f64 (*.f64 angle (PI.f64))))
(exp.f64 (log.f64 (*.f64 angle (PI.f64))))
(exp.f64 (.f64 (log.f64 (.f64 angle (PI.f64))) 1))
(log1p.f64 (expm1.f64 (*.f64 angle (PI.f64))))
(-.f64 (exp.f64 (log1p.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180))) 1)
(/.f64 -180 (/.f64 (*.f64 angle (PI.f64)) (/.f64 x-scale y-scale)))
(/.f64 (.f64 -180 x-scale) (.f64 y-scale (*.f64 angle (PI.f64))))
(/.f64 (.f64 90 (.f64 x-scale -2)) (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (.f64 -180 (/.f64 x-scale y-scale)) (.f64 angle (PI.f64)))
(/.f64 (.f64 -180 (neg.f64 x-scale)) (.f64 y-scale (*.f64 (PI.f64) (neg.f64 angle))))
(/.f64 (.f64 (.f64 x-scale -2) 90) (.f64 y-scale (.f64 angle (PI.f64))))
(pow.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180) 1)
(pow.f64 (sqrt.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180)) 2)
(pow.f64 (cbrt.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180)) 3)
(pow.f64 (pow.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180) 3) 1/3)
(neg.f64 (.f64 (/.f64 x-scale (.f64 y-scale (*.f64 (PI.f64) (neg.f64 angle)))) -180))
(neg.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 (PI.f64) (neg.f64 angle))))))
(sqrt.f64 (.f64 32400 (pow.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) 2)))
(log.f64 (pow.f64 (exp.f64 -180) (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180))))
(cbrt.f64 (pow.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180) 3))
(expm1.f64 (log1p.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180)))
(exp.f64 (log.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180)))
(exp.f64 (.f64 (log.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180)) 1))
(log1p.f64 (expm1.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180)))
(-.f64 (exp.f64 (log1p.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180))))) 1)
(/.f64 180 (/.f64 (PI.f64) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180))))
(/.f64 1 (/.f64 (PI.f64) (.f64 180 (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180)))))
(/.f64 (.f64 180 (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180))) (PI.f64))
(/.f64 (/.f64 (.f64 180 (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180))) 1) (PI.f64))
(/.f64 (/.f64 (.f64 180 (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(/.f64 (/.f64 (.f64 180 (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180))) (cbrt.f64 (pow.f64 (PI.f64) 2))) (cbrt.f64 (PI.f64)))
(/.f64 (.f64 (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180)) -180) (neg.f64 (PI.f64)))
(pow.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180))) 1)
(pow.f64 (sqrt.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180)))) 2)
(pow.f64 (cbrt.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180)))) 3)
(pow.f64 (pow.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180))) 3) 1/3)
(neg.f64 (.f64 (/.f64 (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180)) (neg.f64 (PI.f64))) 180))
(neg.f64 (.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180)) (neg.f64 (PI.f64)))))
(neg.f64 (/.f64 (.f64 180 (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180))) (neg.f64 (PI.f64))))
(sqrt.f64 (pow.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180))) 2))
(log.f64 (pow.f64 (exp.f64 180) (/.f64 (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180)) (PI.f64))))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180))))))
(cbrt.f64 (pow.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180))) 3))
(expm1.f64 (log1p.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180)))))
(exp.f64 (log.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180)))))
(exp.f64 (.f64 (log.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180)))) 1))
(log1p.f64 (expm1.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180)))))

Outputs
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(-.f64 (exp.f64 (log1p.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))))) 1)
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(.f64 x-scale (/.f64 (/.f64 1 y-scale) (.f64 angle (PI.f64))))
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) 1)
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(.f64 1 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))))
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(.f64 (sqrt.f64 x-scale) (.f64 (sqrt.f64 x-scale) (/.f64 (/.f64 1 y-scale) (*.f64 angle (PI.f64)))))
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(.f64 (sqrt.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64)))) (sqrt.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))))
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(.f64 (pow.f64 (cbrt.f64 x-scale) 2) (.f64 (cbrt.f64 x-scale) (/.f64 (/.f64 1 y-scale) (*.f64 angle (PI.f64)))))
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(.f64 (cbrt.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64)))) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) 2)))
(.f64 (cbrt.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))) (cbrt.f64 (pow.f64 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))) 2)))
(.f64 (cbrt.f64 (/.f64 (/.f64 x-scale (PI.f64)) (.f64 y-scale angle))) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle)) 2)))
(.f64 (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) 2)) (cbrt.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))))
(.f64 (cbrt.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))) (cbrt.f64 (pow.f64 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))) 2)))
(.f64 (cbrt.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64)))) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) 2)))
(.f64 (cbrt.f64 (/.f64 (/.f64 x-scale (PI.f64)) (.f64 y-scale angle))) (cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle)) 2)))
(.f64 (/.f64 x-scale y-scale) (/.f64 1 (.f64 angle (PI.f64))))
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(.f64 (/.f64 (/.f64 1 y-scale) (.f64 angle (PI.f64))) x-scale)
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(.f64 (neg.f64 x-scale) (/.f64 1 (.f64 y-scale (*.f64 (PI.f64) (neg.f64 angle)))))
(/.f64 (neg.f64 x-scale) (.f64 y-scale (.f64 (PI.f64) (neg.f64 angle))))
(/.f64 (neg.f64 x-scale) (.f64 y-scale (.f64 angle (neg.f64 (PI.f64)))))
(.f64 (/.f64 1 y-scale) (/.f64 x-scale (.f64 angle (PI.f64))))
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(.f64 (/.f64 1 (.f64 angle (PI.f64))) (/.f64 x-scale y-scale))
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(.f64 (/.f64 1 (sqrt.f64 (.f64 y-scale (.f64 angle (PI.f64))))) (/.f64 x-scale (sqrt.f64 (.f64 y-scale (*.f64 angle (PI.f64))))))
(/.f64 (/.f64 x-scale (sqrt.f64 (.f64 y-scale (.f64 angle (PI.f64))))) (sqrt.f64 (.f64 y-scale (.f64 angle (PI.f64)))))
(/.f64 x-scale (.f64 (sqrt.f64 (.f64 (PI.f64) (.f64 y-scale angle))) (sqrt.f64 (.f64 (PI.f64) (*.f64 y-scale angle)))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (.f64 y-scale (.f64 angle (PI.f64)))) 2)) (/.f64 x-scale (cbrt.f64 (.f64 y-scale (*.f64 angle (PI.f64))))))
(/.f64 (/.f64 x-scale (pow.f64 (cbrt.f64 (.f64 y-scale (.f64 angle (PI.f64)))) 2)) (cbrt.f64 (.f64 y-scale (.f64 angle (PI.f64)))))
(/.f64 x-scale (.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 y-scale angle))) (pow.f64 (cbrt.f64 (.f64 (PI.f64) (*.f64 y-scale angle))) 2)))
(.f64 (/.f64 1 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(.f64 (/.f64 1 (.f64 y-scale (*.f64 (PI.f64) (neg.f64 angle)))) (neg.f64 x-scale))
(/.f64 (neg.f64 x-scale) (.f64 y-scale (.f64 (PI.f64) (neg.f64 angle))))
(/.f64 (neg.f64 x-scale) (.f64 y-scale (.f64 angle (neg.f64 (PI.f64)))))
(.f64 (/.f64 (sqrt.f64 x-scale) 1) (/.f64 (sqrt.f64 x-scale) (.f64 y-scale (*.f64 angle (PI.f64)))))
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(.f64 (/.f64 (sqrt.f64 x-scale) y-scale) (/.f64 (sqrt.f64 x-scale) (.f64 angle (PI.f64))))
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) 1) (/.f64 (cbrt.f64 x-scale) (.f64 y-scale (*.f64 angle (PI.f64)))))
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(.f64 (/.f64 (sqrt.f64 x-scale) (.f64 angle (PI.f64))) (/.f64 (sqrt.f64 x-scale) y-scale))
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(.f64 (/.f64 (sqrt.f64 x-scale) (.f64 y-scale (*.f64 angle (PI.f64)))) (sqrt.f64 x-scale))
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(.f64 (/.f64 (sqrt.f64 x-scale) (pow.f64 (cbrt.f64 (.f64 y-scale (.f64 angle (PI.f64)))) 2)) (/.f64 (sqrt.f64 x-scale) (cbrt.f64 (.f64 y-scale (*.f64 angle (PI.f64))))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (.f64 y-scale (.f64 angle (PI.f64)))) 2)) (/.f64 x-scale (cbrt.f64 (.f64 y-scale (*.f64 angle (PI.f64))))))
(/.f64 (/.f64 x-scale (pow.f64 (cbrt.f64 (.f64 y-scale (.f64 angle (PI.f64)))) 2)) (cbrt.f64 (.f64 y-scale (.f64 angle (PI.f64)))))
(/.f64 x-scale (.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 y-scale angle))) (pow.f64 (cbrt.f64 (.f64 (PI.f64) (*.f64 y-scale angle))) 2)))
(.f64 (/.f64 (sqrt.f64 x-scale) (.f64 y-scale angle)) (/.f64 (sqrt.f64 x-scale) (PI.f64)))
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) y-scale) (/.f64 (cbrt.f64 x-scale) (.f64 angle (PI.f64))))
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (.f64 angle (PI.f64))) (/.f64 (cbrt.f64 x-scale) y-scale))
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (sqrt.f64 (.f64 y-scale (.f64 angle (PI.f64))))) (/.f64 (cbrt.f64 x-scale) (sqrt.f64 (.f64 y-scale (*.f64 angle (PI.f64))))))
(.f64 (/.f64 1 (sqrt.f64 (.f64 y-scale (.f64 angle (PI.f64))))) (/.f64 x-scale (sqrt.f64 (.f64 y-scale (*.f64 angle (PI.f64))))))
(/.f64 (/.f64 x-scale (sqrt.f64 (.f64 y-scale (.f64 angle (PI.f64))))) (sqrt.f64 (.f64 y-scale (.f64 angle (PI.f64)))))
(/.f64 x-scale (.f64 (sqrt.f64 (.f64 (PI.f64) (.f64 y-scale angle))) (sqrt.f64 (.f64 (PI.f64) (*.f64 y-scale angle)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (pow.f64 (cbrt.f64 (.f64 y-scale (.f64 angle (PI.f64)))) 2)) (cbrt.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64)))))
(.f64 (cbrt.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))) (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (pow.f64 (cbrt.f64 (.f64 y-scale (*.f64 angle (PI.f64)))) 2)))
(.f64 (cbrt.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64)))) (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (pow.f64 (cbrt.f64 (.f64 y-scale (.f64 angle (PI.f64)))) 2)))
(.f64 (cbrt.f64 (/.f64 (/.f64 x-scale (PI.f64)) (.f64 y-scale angle))) (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (pow.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 y-scale angle))) 2)))
(.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (.f64 y-scale angle)) (/.f64 (cbrt.f64 x-scale) (PI.f64)))
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(.f64 (/.f64 1 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) (sqrt.f64 x-scale))) (sqrt.f64 x-scale))
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(.f64 (/.f64 1 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) (pow.f64 (cbrt.f64 x-scale) 2))) (cbrt.f64 x-scale))
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (.f64 y-scale (*.f64 angle (PI.f64)))) (cbrt.f64 x-scale))
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(pow.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) 1)
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(pow.f64 (sqrt.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))) 2)
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(pow.f64 (cbrt.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))) 3)
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(pow.f64 (pow.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) 3) 1/3)
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(pow.f64 (/.f64 (*.f64 angle (PI.f64)) (/.f64 x-scale y-scale)) -1)
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(neg.f64 (/.f64 x-scale (.f64 y-scale (.f64 (PI.f64) (neg.f64 angle)))))
(/.f64 (neg.f64 x-scale) (.f64 y-scale (.f64 (PI.f64) (neg.f64 angle))))
(/.f64 (neg.f64 x-scale) (.f64 y-scale (.f64 angle (neg.f64 (PI.f64)))))
(neg.f64 (.f64 (/.f64 x-scale (.f64 y-scale (*.f64 (PI.f64) (neg.f64 angle)))) 1))
(/.f64 (neg.f64 x-scale) (.f64 y-scale (.f64 (PI.f64) (neg.f64 angle))))
(/.f64 (neg.f64 x-scale) (.f64 y-scale (.f64 angle (neg.f64 (PI.f64)))))
(neg.f64 (.f64 x-scale (/.f64 1 (.f64 y-scale (*.f64 (PI.f64) (neg.f64 angle))))))
(/.f64 (neg.f64 x-scale) (.f64 y-scale (.f64 (PI.f64) (neg.f64 angle))))
(/.f64 (neg.f64 x-scale) (.f64 y-scale (.f64 angle (neg.f64 (PI.f64)))))
(neg.f64 (.f64 1 (/.f64 x-scale (.f64 y-scale (*.f64 (PI.f64) (neg.f64 angle))))))
(/.f64 (neg.f64 x-scale) (.f64 y-scale (.f64 (PI.f64) (neg.f64 angle))))
(/.f64 (neg.f64 x-scale) (.f64 y-scale (.f64 angle (neg.f64 (PI.f64)))))
(neg.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 (PI.f64) (neg.f64 angle))))
(/.f64 (neg.f64 x-scale) (.f64 y-scale (.f64 (PI.f64) (neg.f64 angle))))
(/.f64 (neg.f64 x-scale) (.f64 y-scale (.f64 angle (neg.f64 (PI.f64)))))
(neg.f64 (/.f64 (neg.f64 x-scale) (.f64 y-scale (.f64 angle (PI.f64)))))
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(sqrt.f64 (pow.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) 2))
(sqrt.f64 (pow.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) 2))
(fabs.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))))
(fabs.f64 (/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle)))
(log.f64 (exp.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))))
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(log.f64 (+.f64 1 (expm1.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))))))
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(cbrt.f64 (pow.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) 3))
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(cbrt.f64 (/.f64 (pow.f64 x-scale 3) (pow.f64 (.f64 y-scale (.f64 angle (PI.f64))) 3)))
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(expm1.f64 (log1p.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))))
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(exp.f64 (log.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))))
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(exp.f64 (.f64 (log.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64)))) 1))
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(log1p.f64 (expm1.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))))
(/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(-.f64 (exp.f64 (log1p.f64 (*.f64 angle (PI.f64)))) 1)
(*.f64 angle (PI.f64))
(pow.f64 (*.f64 angle (PI.f64)) 1)
(*.f64 angle (PI.f64))
(pow.f64 (sqrt.f64 (*.f64 angle (PI.f64))) 2)
(*.f64 angle (PI.f64))
(pow.f64 (cbrt.f64 (*.f64 angle (PI.f64))) 3)
(*.f64 angle (PI.f64))
(pow.f64 (pow.f64 (*.f64 angle (PI.f64)) 3) 1/3)
(*.f64 angle (PI.f64))
(sqrt.f64 (pow.f64 (*.f64 angle (PI.f64)) 2))
(fabs.f64 (*.f64 angle (PI.f64)))
(log.f64 (pow.f64 (exp.f64 angle) (PI.f64)))
(*.f64 angle (PI.f64))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 angle (PI.f64)))))
(*.f64 angle (PI.f64))
(cbrt.f64 (pow.f64 (*.f64 angle (PI.f64)) 3))
(*.f64 angle (PI.f64))
(cbrt.f64 (*.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)))
(*.f64 angle (PI.f64))
(cbrt.f64 (*.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)))
(*.f64 angle (PI.f64))
(expm1.f64 (log1p.f64 (*.f64 angle (PI.f64))))
(*.f64 angle (PI.f64))
(exp.f64 (log.f64 (*.f64 angle (PI.f64))))
(*.f64 angle (PI.f64))
(exp.f64 (.f64 (log.f64 (.f64 angle (PI.f64))) 1))
(*.f64 angle (PI.f64))
(log1p.f64 (expm1.f64 (*.f64 angle (PI.f64))))
(*.f64 angle (PI.f64))
(-.f64 (exp.f64 (log1p.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180))) 1)
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(/.f64 -180 (/.f64 (*.f64 angle (PI.f64)) (/.f64 x-scale y-scale)))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(/.f64 (.f64 -180 x-scale) (.f64 y-scale (*.f64 angle (PI.f64))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(/.f64 (.f64 90 (.f64 x-scale -2)) (.f64 y-scale (.f64 angle (PI.f64))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(/.f64 (.f64 -180 (/.f64 x-scale y-scale)) (.f64 angle (PI.f64)))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(/.f64 (.f64 -180 (neg.f64 x-scale)) (.f64 y-scale (*.f64 (PI.f64) (neg.f64 angle))))
(.f64 (/.f64 -180 y-scale) (/.f64 (neg.f64 x-scale) (.f64 (PI.f64) (neg.f64 angle))))
(/.f64 (.f64 x-scale 180) (.f64 y-scale (*.f64 angle (neg.f64 (PI.f64)))))
(/.f64 (/.f64 (.f64 x-scale 180) y-scale) (.f64 angle (neg.f64 (PI.f64))))
(/.f64 (.f64 (.f64 x-scale -2) 90) (.f64 y-scale (.f64 angle (PI.f64))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(pow.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180) 1)
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(pow.f64 (sqrt.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180)) 2)
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(pow.f64 (cbrt.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180)) 3)
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(pow.f64 (pow.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180) 3) 1/3)
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(neg.f64 (.f64 (/.f64 x-scale (.f64 y-scale (*.f64 (PI.f64) (neg.f64 angle)))) -180))
(.f64 (/.f64 -180 y-scale) (/.f64 (neg.f64 x-scale) (.f64 (PI.f64) (neg.f64 angle))))
(/.f64 (.f64 x-scale 180) (.f64 y-scale (*.f64 angle (neg.f64 (PI.f64)))))
(/.f64 (/.f64 (.f64 x-scale 180) y-scale) (.f64 angle (neg.f64 (PI.f64))))
(neg.f64 (.f64 -180 (/.f64 x-scale (.f64 y-scale (*.f64 (PI.f64) (neg.f64 angle))))))
(.f64 (/.f64 -180 y-scale) (/.f64 (neg.f64 x-scale) (.f64 (PI.f64) (neg.f64 angle))))
(/.f64 (.f64 x-scale 180) (.f64 y-scale (*.f64 angle (neg.f64 (PI.f64)))))
(/.f64 (/.f64 (.f64 x-scale 180) y-scale) (.f64 angle (neg.f64 (PI.f64))))
(sqrt.f64 (.f64 32400 (pow.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) 2)))
(sqrt.f64 (.f64 (pow.f64 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))) 2) 32400))
(sqrt.f64 (pow.f64 (.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64))) 2))
(log.f64 (pow.f64 (exp.f64 -180) (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180))))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(cbrt.f64 (pow.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180) 3))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(expm1.f64 (log1p.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180)))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(exp.f64 (log.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180)))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(exp.f64 (.f64 (log.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180)) 1))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(log1p.f64 (expm1.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180)))
(*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))
(.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))
(-.f64 (exp.f64 (log1p.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180))))) 1)
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(/.f64 180 (/.f64 (PI.f64) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180))))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(/.f64 1 (/.f64 (PI.f64) (.f64 180 (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180)))))
(.f64 (/.f64 1 (PI.f64)) (.f64 180 (atan.f64 (*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64))))))
(.f64 (.f64 180 (atan.f64 (.f64 (/.f64 -180 (.f64 y-scale angle)) (/.f64 x-scale (PI.f64))))) (/.f64 1 (PI.f64)))
(/.f64 (.f64 180 (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180))) (PI.f64))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(/.f64 (/.f64 (.f64 180 (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180))) 1) (PI.f64))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(/.f64 (/.f64 (.f64 180 (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(/.f64 (/.f64 (.f64 180 (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180))) (cbrt.f64 (pow.f64 (PI.f64) 2))) (cbrt.f64 (PI.f64)))
(/.f64 (.f64 180 (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64))))) (*.f64 (cbrt.f64 (PI.f64)) (cbrt.f64 (pow.f64 (PI.f64) 2))))
(.f64 (/.f64 180 (cbrt.f64 (PI.f64))) (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (cbrt.f64 (pow.f64 (PI.f64) 2))))
(/.f64 (.f64 (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180)) -180) (neg.f64 (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(pow.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180))) 1)
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(pow.f64 (sqrt.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180)))) 2)
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(pow.f64 (cbrt.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180)))) 3)
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(pow.f64 (pow.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180))) 3) 1/3)
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(neg.f64 (.f64 (/.f64 (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180)) (neg.f64 (PI.f64))) 180))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(neg.f64 (.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180)) (neg.f64 (PI.f64)))))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(neg.f64 (/.f64 (.f64 180 (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180))) (neg.f64 (PI.f64))))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(sqrt.f64 (pow.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180))) 2))
(sqrt.f64 (pow.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64))))) 2))
(fabs.f64 (.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64))))
(log.f64 (pow.f64 (exp.f64 180) (/.f64 (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180)) (PI.f64))))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180))))))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(cbrt.f64 (pow.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180))) 3))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(expm1.f64 (log1p.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180)))))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(exp.f64 (log.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180)))))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(exp.f64 (.f64 (log.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180)))) 1))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))
(log1p.f64 (expm1.f64 (.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (*.f64 angle (PI.f64))) -180)))))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 (*.f64 y-scale angle)) (/.f64 x-scale (PI.f64)))) (PI.f64)))

localize73.0ms (0%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	89.7%	(/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64)))))
✓	87.1%	(/.f64 b (*.f64 x-scale x-scale))
✓	85.5%	(.f64 angle (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64))))
✓	43.1%	(/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))) x-scale))

Compiler

Compiled 321 to 62 computations (80.7% saved)

series78.0ms (0.1%)

Counts

4 → 168

Calls

42 calls:

Time	Variable		Point	Expression
23.0ms	b	@	0	(/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))) x-scale))
6.0ms	a	@	-inf	(/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))) x-scale))
6.0ms	b	@	inf	(/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64)))))
4.0ms	angle	@	0	(/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))) x-scale))
4.0ms	b	@	inf	(/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))) x-scale))

rewrite119.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

636×	`add-sqr-sqrt`
626×	`pow1`
626×	`*-un-lft-identity`
588×	`add-exp-log`
588×	`add-log-exp`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	26	184
1	606	184

Stop Event

1×	node limit

Counts

4 → 117

Calls

Call 1

Inputs
(/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))) x-scale))
(.f64 angle (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64))))
(/.f64 b (*.f64 x-scale x-scale))
(/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64)))))

Outputs
(((.f64 y-scale (.f64 (/.f64 1 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 y-scale (/.f64 1 (.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 x-scale (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 1 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (sqrt.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2)))) (sqrt.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (.f64 (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (cbrt.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2)))) (cbrt.f64 (pow.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-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 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (cbrt.f64 (pow.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2))) 2)) (cbrt.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) 2)) (.f64 (cbrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 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 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2)) (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2) (/.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (/.f64 1 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 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (neg.f64 y-scale) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (/.f64 1 (/.f64 -1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2)) 1) 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 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2)) (sqrt.f64 x-scale)) (sqrt.f64 x-scale)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2)) (cbrt.f64 (.f64 x-scale x-scale))) (cbrt.f64 x-scale)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 1 (sqrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))) (/.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (sqrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 1 (cbrt.f64 (pow.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) 2))) (/.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (cbrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) 1) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 y-scale 1) (/.f64 (/.f64 1 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) 1/2) (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (/.f64 -1/2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) (neg.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>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (pow.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2))) 1/2) (pow.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-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 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (sqrt.f64 y-scale) (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))) (/.f64 (sqrt.f64 y-scale) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))) (/.f64 (cbrt.f64 y-scale) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 y-scale (/.f64 1/2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) (/.f64 (/.f64 1 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (/.f64 1 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 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 y-scale (sqrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))) (/.f64 (/.f64 1 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (sqrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 y-scale (cbrt.f64 (pow.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) 2))) (/.f64 (/.f64 1 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (cbrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (/.f64 1/2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) (/.f64 (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (/.f64 1 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 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) 1) (/.f64 (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (sqrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))) (/.f64 (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (sqrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (cbrt.f64 (pow.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) 2))) (/.f64 (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (cbrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) 2)) (/.f64 1/2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) (/.f64 (cbrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (/.f64 1 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 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) 2)) 1) (/.f64 (cbrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) 2)) (sqrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))) (/.f64 (cbrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (sqrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) 2)) (cbrt.f64 (pow.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) 2))) (/.f64 (cbrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (cbrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((pow.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((neg.f64 (/.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (/.f64 -1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((log.f64 (exp.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((cbrt.f64 (.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2))) (pow.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-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 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((expm1.f64 (log1p.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((exp.f64 (log.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((log1p.f64 (expm1.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64)))))) #f)))
(((pow.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((log.f64 (exp.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((cbrt.f64 (.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) (pow.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b 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 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((expm1.f64 (log1p.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((exp.f64 (log.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((log1p.f64 (expm1.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)))
(((.f64 b (/.f64 1 (.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 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 b (.f64 x-scale x-scale)) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 1 (/.f64 b (.f64 x-scale x-scale))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (sqrt.f64 (/.f64 b (.f64 x-scale x-scale))) (sqrt.f64 (/.f64 b (.f64 x-scale x-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (sqrt.f64 b) (.f64 (sqrt.f64 b) (/.f64 1 (.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 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (cbrt.f64 (/.f64 b (.f64 x-scale x-scale))) (cbrt.f64 (pow.f64 (/.f64 b (.f64 x-scale x-scale)) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (cbrt.f64 (pow.f64 (/.f64 b (.f64 x-scale x-scale)) 2)) (cbrt.f64 (/.f64 b (.f64 x-scale x-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (cbrt.f64 (.f64 b b)) (.f64 (cbrt.f64 b) (/.f64 1 (.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 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 b x-scale) (/.f64 1 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 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (neg.f64 b) (/.f64 1 (.f64 x-scale (neg.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>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 1 (.f64 x-scale x-scale)) b) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 1 x-scale) (/.f64 b x-scale)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 1 (sqrt.f64 (.f64 x-scale x-scale))) (/.f64 b (sqrt.f64 (.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 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 1 (cbrt.f64 (pow.f64 x-scale 4))) (/.f64 b (cbrt.f64 (.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 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (pow.f64 (/.f64 b (.f64 x-scale x-scale)) 1/2) (pow.f64 (/.f64 b (.f64 x-scale x-scale)) 1/2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (sqrt.f64 b) 1) (/.f64 (sqrt.f64 b) (.f64 x-scale x-scale))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (sqrt.f64 b) x-scale) (/.f64 (sqrt.f64 b) x-scale)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (cbrt.f64 (.f64 b b)) 1) (/.f64 (cbrt.f64 b) (.f64 x-scale x-scale))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (sqrt.f64 b) (sqrt.f64 (.f64 x-scale x-scale))) (/.f64 (sqrt.f64 b) (sqrt.f64 (.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 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (sqrt.f64 b) (cbrt.f64 (pow.f64 x-scale 4))) (/.f64 (sqrt.f64 b) (cbrt.f64 (.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 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (cbrt.f64 (.f64 b b)) x-scale) (/.f64 (cbrt.f64 b) x-scale)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (cbrt.f64 (.f64 b b)) (sqrt.f64 (.f64 x-scale x-scale))) (/.f64 (cbrt.f64 b) (sqrt.f64 (.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 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (cbrt.f64 (.f64 b b)) (cbrt.f64 (pow.f64 x-scale 4))) (/.f64 (cbrt.f64 b) (cbrt.f64 (.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 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((pow.f64 (/.f64 b (.f64 x-scale x-scale)) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((neg.f64 (/.f64 b (.f64 x-scale (neg.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>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((log.f64 (exp.f64 (/.f64 b (.f64 x-scale x-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((cbrt.f64 (.f64 (/.f64 b (.f64 x-scale x-scale)) (pow.f64 (/.f64 b (.f64 x-scale x-scale)) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((expm1.f64 (log1p.f64 (/.f64 b (.f64 x-scale x-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((exp.f64 (log.f64 (/.f64 b (.f64 x-scale x-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((log1p.f64 (expm1.f64 (/.f64 b (.f64 x-scale x-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64)))))) #f)))
(((.f64 y-scale (/.f64 1 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 1 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (sqrt.f64 y-scale) (.f64 (sqrt.f64 y-scale) (/.f64 1 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (cbrt.f64 (.f64 y-scale y-scale)) (.f64 (cbrt.f64 y-scale) (/.f64 1 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (cbrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (cbrt.f64 (pow.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b 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 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) 2)) (cbrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 y-scale angle) (/.f64 1 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 1 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b 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>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (neg.f64 y-scale) (/.f64 1 (.f64 angle (neg.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 1 angle) (/.f64 y-scale (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 1 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) (/.f64 y-scale angle)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 1 (sqrt.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (/.f64 y-scale (sqrt.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 1 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) 2))) (/.f64 y-scale (cbrt.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 1 (.f64 angle (+.f64 b a))) (/.f64 y-scale (.f64 (-.f64 b a) (PI.f64)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (pow.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) 1/2) (pow.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) 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 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (sqrt.f64 y-scale) angle) (/.f64 (sqrt.f64 y-scale) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (sqrt.f64 y-scale) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) (/.f64 (sqrt.f64 y-scale) angle)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (sqrt.f64 y-scale) 1) (/.f64 (sqrt.f64 y-scale) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (sqrt.f64 y-scale) (sqrt.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (/.f64 (sqrt.f64 y-scale) (sqrt.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (sqrt.f64 y-scale) (cbrt.f64 (pow.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) 2))) (/.f64 (sqrt.f64 y-scale) (cbrt.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (sqrt.f64 y-scale) (.f64 angle (+.f64 b a))) (/.f64 (sqrt.f64 y-scale) (.f64 (-.f64 b a) (PI.f64)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) angle) (/.f64 (cbrt.f64 y-scale) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) (/.f64 (cbrt.f64 y-scale) angle)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) 1) (/.f64 (cbrt.f64 y-scale) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (sqrt.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (/.f64 (cbrt.f64 y-scale) (sqrt.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (cbrt.f64 (pow.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) 2))) (/.f64 (cbrt.f64 y-scale) (cbrt.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (.f64 angle (+.f64 b a))) (/.f64 (cbrt.f64 y-scale) (.f64 (-.f64 b a) (PI.f64)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((pow.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((neg.f64 (/.f64 y-scale (.f64 angle (neg.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((log.f64 (exp.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((cbrt.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (pow.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b 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 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((expm1.f64 (log1p.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((exp.f64 (log.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)) ((log1p.f64 (expm1.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) x-scale)) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))) (/.f64 b (.f64 x-scale x-scale)) (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64)))))) #f)))

simplify235.0ms (0.2%)

Algorithm

1×	egg-herbie

Rules

1840×	`associate-r`
1564×	`associate-/r*`
1424×	`associate-l`
1240×	`associate-/l*`
1022×	`associate-*r/`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	703	25475
1	2409	25373

Stop Event

1×	node limit

Counts

285 → 356

Calls

Call 1

Inputs
(.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64)))))))
(+.f64 (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))) (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))))
(+.f64 (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))) (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))))
(+.f64 (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))) (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))))
(.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64)))))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))))
(.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64)))))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))
(.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(+.f64 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))) (.f64 -2 (/.f64 (.f64 x-scale (.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) b)) (.f64 y-scale (.f64 angle (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)))))))
(+.f64 (.f64 2 (.f64 (-.f64 (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64))))) (+.f64 (/.f64 (.f64 x-scale (pow.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) 2)) (.f64 y-scale (.f64 angle (.f64 (pow.f64 a 4) (pow.f64 (PI.f64) 3))))) (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64))))))) (pow.f64 b 2))) (+.f64 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))) (.f64 -2 (/.f64 (.f64 x-scale (.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) b)) (.f64 y-scale (.f64 angle (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))))))))
(+.f64 (.f64 2 (.f64 (-.f64 (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64))))) (+.f64 (/.f64 (.f64 x-scale (pow.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) 2)) (.f64 y-scale (.f64 angle (.f64 (pow.f64 a 4) (pow.f64 (PI.f64) 3))))) (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64))))))) (pow.f64 b 2))) (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 x-scale (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64))))) (.f64 y-scale (.f64 angle (.f64 (pow.f64 a 4) (pow.f64 (PI.f64) 2))))) (.f64 -1 (/.f64 (.f64 (-.f64 (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64))))) (+.f64 (/.f64 (.f64 x-scale (pow.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) 2)) (.f64 y-scale (.f64 angle (.f64 (pow.f64 a 4) (pow.f64 (PI.f64) 3))))) (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64))))))) (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64))))) (.f64 (pow.f64 a 2) (PI.f64))))) (pow.f64 b 3))) (+.f64 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))) (.f64 -2 (/.f64 (.f64 x-scale (.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) b)) (.f64 y-scale (.f64 angle (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)))))))))
(.f64 -2 (/.f64 y-scale (.f64 x-scale (*.f64 angle (PI.f64)))))
(+.f64 (.f64 -2 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64))))) (.f64 2 (/.f64 (.f64 y-scale (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 angle 2) (*.f64 b (pow.f64 (PI.f64) 2)))))))
(+.f64 (.f64 -2 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64))))) (+.f64 (.f64 2 (/.f64 (.f64 y-scale (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 angle 2) (.f64 b (pow.f64 (PI.f64) 2)))))) (.f64 2 (/.f64 (-.f64 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (PI.f64)))) (+.f64 (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 x-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64)))) 2)) (.f64 x-scale (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)))))) (pow.f64 b 2)))))
(+.f64 (.f64 -2 (/.f64 (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64)))))) (.f64 x-scale (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))) (/.f64 (.f64 (-.f64 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (PI.f64)))) (+.f64 (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 x-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64)))) 2)) (.f64 x-scale (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)))))) (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64))))) (.f64 angle (PI.f64)))) (pow.f64 b 3))) (+.f64 (.f64 -2 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64))))) (+.f64 (.f64 2 (/.f64 (.f64 y-scale (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 angle 2) (.f64 b (pow.f64 (PI.f64) 2)))))) (.f64 2 (/.f64 (-.f64 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (PI.f64)))) (+.f64 (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 x-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64)))) 2)) (.f64 x-scale (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)))))) (pow.f64 b 2))))))
(.f64 -2 (/.f64 y-scale (.f64 x-scale (*.f64 angle (PI.f64)))))
(+.f64 (.f64 -2 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64))))) (.f64 2 (/.f64 (.f64 y-scale (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 angle 2) (*.f64 b (pow.f64 (PI.f64) 2)))))))
(+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (PI.f64))))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64)))) 2)) (.f64 x-scale (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))))) (.f64 -1 (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 x-scale (.f64 angle (PI.f64))))))) (pow.f64 b 2))) (+.f64 (.f64 -2 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64))))) (.f64 2 (/.f64 (.f64 y-scale (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 angle 2) (*.f64 b (pow.f64 (PI.f64) 2))))))))
(+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (PI.f64))))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64)))) 2)) (.f64 x-scale (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))))) (.f64 -1 (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 x-scale (.f64 angle (PI.f64))))))) (pow.f64 b 2))) (+.f64 (.f64 -2 (/.f64 (+.f64 (.f64 -1 (/.f64 (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (PI.f64))))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64)))) 2)) (.f64 x-scale (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))))) (.f64 -1 (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 x-scale (.f64 angle (PI.f64))))))) (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64))))) (.f64 angle (PI.f64)))) (.f64 -1 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64)))))) (.f64 x-scale (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2)))))) (pow.f64 b 3))) (+.f64 (.f64 -2 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64))))) (.f64 2 (/.f64 (.f64 y-scale (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 angle 2) (*.f64 b (pow.f64 (PI.f64) 2)))))))))
(.f64 -2 (/.f64 y-scale (.f64 x-scale (*.f64 angle (PI.f64)))))
(+.f64 (.f64 2 (/.f64 (.f64 y-scale (.f64 a (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))))) (.f64 x-scale (.f64 angle (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))))) (.f64 -2 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64))))))
(+.f64 (.f64 2 (/.f64 (.f64 y-scale (.f64 a (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))))) (.f64 x-scale (.f64 angle (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (-.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64))))) (+.f64 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 x-scale (.f64 angle (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 3))))) (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64))))))))) (.f64 -2 (/.f64 y-scale (.f64 x-scale (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (-.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64))))) (+.f64 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 x-scale (.f64 angle (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 3))))) (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64))))))) (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (.f64 (pow.f64 b 2) (PI.f64))) (.f64 -1 (/.f64 (.f64 y-scale (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (.f64 x-scale (.f64 angle (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2))))))) (pow.f64 a 3))) (+.f64 (.f64 2 (/.f64 (.f64 y-scale (.f64 a (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))))) (.f64 x-scale (.f64 angle (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (-.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64))))) (+.f64 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 x-scale (.f64 angle (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 3))))) (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64))))))))) (.f64 -2 (/.f64 y-scale (.f64 x-scale (*.f64 angle (PI.f64))))))))
(.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(+.f64 (.f64 -2 (/.f64 (.f64 x-scale (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (.f64 y-scale (.f64 angle (.f64 a (pow.f64 (PI.f64) 2)))))) (.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64))))))
(+.f64 (.f64 -2 (/.f64 (.f64 x-scale (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (.f64 y-scale (.f64 angle (.f64 a (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 2 (/.f64 (-.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (PI.f64)))) (+.f64 (/.f64 (.f64 x-scale (pow.f64 b 2)) (.f64 y-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 y-scale (.f64 angle (pow.f64 (PI.f64) 3)))))) (pow.f64 a 2))) (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))))
(+.f64 (.f64 -2 (/.f64 (+.f64 (.f64 -1 (/.f64 (.f64 (-.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (PI.f64)))) (+.f64 (/.f64 (.f64 x-scale (pow.f64 b 2)) (.f64 y-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 y-scale (.f64 angle (pow.f64 (PI.f64) 3)))))) (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (PI.f64))) (/.f64 (.f64 x-scale (.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) (pow.f64 b 2))) (.f64 y-scale (.f64 angle (pow.f64 (PI.f64) 2))))) (pow.f64 a 3))) (+.f64 (.f64 -2 (/.f64 (.f64 x-scale (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (.f64 y-scale (.f64 angle (.f64 a (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 2 (/.f64 (-.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (PI.f64)))) (+.f64 (/.f64 (.f64 x-scale (pow.f64 b 2)) (.f64 y-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 y-scale (.f64 angle (pow.f64 (PI.f64) 3)))))) (pow.f64 a 2))) (.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64))))))))
(.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (.f64 y-scale (.f64 angle (.f64 a (pow.f64 (PI.f64) 2)))))) (.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64))))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (.f64 y-scale (.f64 angle (.f64 a (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 2 (/.f64 (-.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (PI.f64)))) (+.f64 (/.f64 (.f64 x-scale (pow.f64 b 2)) (.f64 y-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 y-scale (.f64 angle (pow.f64 (PI.f64) 3)))))) (pow.f64 a 2))) (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (.f64 y-scale (.f64 angle (.f64 a (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 2 (/.f64 (+.f64 (.f64 -1 (/.f64 (.f64 (-.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (PI.f64)))) (+.f64 (/.f64 (.f64 x-scale (pow.f64 b 2)) (.f64 y-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 y-scale (.f64 angle (pow.f64 (PI.f64) 3)))))) (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (PI.f64))) (/.f64 (.f64 x-scale (.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) (pow.f64 b 2))) (.f64 y-scale (.f64 angle (pow.f64 (PI.f64) 2))))) (pow.f64 a 3))) (+.f64 (.f64 2 (/.f64 (-.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (PI.f64)))) (+.f64 (/.f64 (.f64 x-scale (pow.f64 b 2)) (.f64 y-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 y-scale (.f64 angle (pow.f64 (PI.f64) 3)))))) (pow.f64 a 2))) (.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64))))))))
(.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))))
(+.f64 (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))) (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))))
(+.f64 (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))) (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))))
(+.f64 (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))) (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))))
(.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))))
(.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))
(.f64 -1 (.f64 angle (*.f64 (pow.f64 a 2) (PI.f64))))
(+.f64 (.f64 -1 (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (.f64 angle (.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) b)))
(+.f64 (.f64 -1 (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (+.f64 (.f64 angle (.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) b)) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))))
(+.f64 (.f64 -1 (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (+.f64 (.f64 angle (.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) b)) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))))
(.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))
(+.f64 (.f64 (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64)))) b) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64))))
(+.f64 (.f64 (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64)))) b) (+.f64 (.f64 -1 (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (.f64 angle (*.f64 (pow.f64 b 2) (PI.f64)))))
(+.f64 (.f64 (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64)))) b) (+.f64 (.f64 -1 (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (.f64 angle (*.f64 (pow.f64 b 2) (PI.f64)))))
(.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))
(+.f64 (.f64 (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64)))) b) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64))))
(+.f64 (.f64 (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64)))) b) (+.f64 (.f64 -1 (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (.f64 angle (*.f64 (pow.f64 b 2) (PI.f64)))))
(+.f64 (.f64 (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64)))) b) (+.f64 (.f64 -1 (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (.f64 angle (*.f64 (pow.f64 b 2) (PI.f64)))))
(.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))
(+.f64 (.f64 angle (.f64 a (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))))) (.f64 angle (*.f64 (pow.f64 b 2) (PI.f64))))
(+.f64 (.f64 angle (.f64 a (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))))) (+.f64 (.f64 -1 (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))))
(+.f64 (.f64 angle (.f64 a (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))))) (+.f64 (.f64 -1 (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))))
(.f64 -1 (.f64 angle (*.f64 (pow.f64 a 2) (PI.f64))))
(+.f64 (.f64 angle (.f64 a (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))))) (.f64 -1 (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))))
(+.f64 (.f64 angle (.f64 a (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))))) (+.f64 (.f64 -1 (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))))
(+.f64 (.f64 angle (.f64 a (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))))) (+.f64 (.f64 -1 (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))))
(.f64 -1 (.f64 angle (*.f64 (pow.f64 a 2) (PI.f64))))
(+.f64 (.f64 -1 (.f64 angle (.f64 a (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))))) (.f64 -1 (.f64 angle (*.f64 (pow.f64 a 2) (PI.f64)))))
(+.f64 (.f64 -1 (.f64 angle (.f64 a (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))))) (+.f64 (.f64 -1 (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (.f64 angle (*.f64 (pow.f64 b 2) (PI.f64)))))
(+.f64 (.f64 -1 (.f64 angle (.f64 a (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))))) (+.f64 (.f64 -1 (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (.f64 angle (*.f64 (pow.f64 b 2) (PI.f64)))))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b)))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b)))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b)))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b)))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(.f64 -1 (/.f64 y-scale (.f64 angle (*.f64 (pow.f64 a 2) (PI.f64)))))
(+.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) b)) (.f64 angle (.f64 (pow.f64 a 4) (pow.f64 (PI.f64) 2))))) (.f64 -1 (/.f64 y-scale (.f64 angle (*.f64 (pow.f64 a 2) (PI.f64))))))
(+.f64 (.f64 -1 (.f64 (+.f64 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) 2)) (.f64 angle (.f64 (pow.f64 a 6) (pow.f64 (PI.f64) 3)))) (/.f64 y-scale (.f64 angle (.f64 (pow.f64 a 4) (PI.f64))))) (pow.f64 b 2))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) b)) (.f64 angle (.f64 (pow.f64 a 4) (pow.f64 (PI.f64) 2))))) (.f64 -1 (/.f64 y-scale (.f64 angle (*.f64 (pow.f64 a 2) (PI.f64)))))))
(+.f64 (.f64 -1 (.f64 (+.f64 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) 2)) (.f64 angle (.f64 (pow.f64 a 6) (pow.f64 (PI.f64) 3)))) (/.f64 y-scale (.f64 angle (.f64 (pow.f64 a 4) (PI.f64))))) (pow.f64 b 2))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) b)) (.f64 angle (.f64 (pow.f64 a 4) (pow.f64 (PI.f64) 2))))) (+.f64 (.f64 -1 (.f64 (+.f64 (/.f64 (.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) (+.f64 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) 2)) (.f64 angle (.f64 (pow.f64 a 6) (pow.f64 (PI.f64) 3)))) (/.f64 y-scale (.f64 angle (.f64 (pow.f64 a 4) (PI.f64)))))) (.f64 (pow.f64 a 2) (PI.f64))) (/.f64 (.f64 y-scale (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64))))) (.f64 angle (.f64 (pow.f64 a 6) (pow.f64 (PI.f64) 2))))) (pow.f64 b 3))) (.f64 -1 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64))))))))
(/.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64))))
(+.f64 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) (.f64 -1 (/.f64 (.f64 y-scale (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64))))) (.f64 angle (*.f64 (pow.f64 b 3) (pow.f64 (PI.f64) 2))))))
(+.f64 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64))))) (.f64 angle (.f64 (pow.f64 b 3) (pow.f64 (PI.f64) 2))))) (.f64 -1 (/.f64 (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 angle (PI.f64)))) (.f64 -1 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) 2)) (*.f64 angle (pow.f64 (PI.f64) 3))))) (pow.f64 b 4)))))
(+.f64 (.f64 -1 (/.f64 (+.f64 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))))) (.f64 angle (pow.f64 (PI.f64) 2))) (.f64 -1 (/.f64 (.f64 (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 angle (PI.f64)))) (.f64 -1 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) 2)) (.f64 angle (pow.f64 (PI.f64) 3))))) (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64))))) (PI.f64)))) (pow.f64 b 5))) (+.f64 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64))))) (.f64 angle (.f64 (pow.f64 b 3) (pow.f64 (PI.f64) 2))))) (.f64 -1 (/.f64 (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 angle (PI.f64)))) (.f64 -1 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) 2)) (.f64 angle (pow.f64 (PI.f64) 3))))) (pow.f64 b 4))))))
(/.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64))))
(+.f64 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) (.f64 -1 (/.f64 (.f64 y-scale (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64))))) (.f64 angle (*.f64 (pow.f64 b 3) (pow.f64 (PI.f64) 2))))))
(+.f64 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) 2)) (.f64 angle (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 3)))) (+.f64 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64))))) (.f64 angle (.f64 (pow.f64 b 3) (pow.f64 (PI.f64) 2))))) (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 angle (.f64 (pow.f64 b 4) (PI.f64)))))))
(+.f64 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) 2)) (.f64 angle (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 3)))) (+.f64 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64))))) (.f64 angle (.f64 (pow.f64 b 3) (pow.f64 (PI.f64) 2))))) (+.f64 (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 angle (.f64 (pow.f64 b 4) (PI.f64)))) (.f64 -1 (/.f64 (+.f64 (/.f64 (.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) (+.f64 (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 angle (PI.f64))) (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) 2)) (.f64 angle (pow.f64 (PI.f64) 3))))) (PI.f64)) (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))))) (.f64 angle (pow.f64 (PI.f64) 2)))) (pow.f64 b 5)))))))
(/.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64))))
(+.f64 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) (.f64 -1 (/.f64 (.f64 y-scale (.f64 a (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))))) (.f64 angle (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2))))))
(+.f64 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 a (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))))) (.f64 angle (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2))))) (.f64 -1 (.f64 (pow.f64 a 2) (+.f64 (.f64 -1 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 b 4) (PI.f64))))) (.f64 -1 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 angle (.f64 (pow.f64 b 6) (pow.f64 (PI.f64) 3))))))))))
(+.f64 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) (+.f64 (.f64 -1 (.f64 (+.f64 (.f64 -1 (/.f64 (.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) (+.f64 (.f64 -1 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 b 4) (PI.f64))))) (.f64 -1 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 angle (.f64 (pow.f64 b 6) (pow.f64 (PI.f64) 3))))))) (.f64 (pow.f64 b 2) (PI.f64)))) (/.f64 (.f64 y-scale (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (.f64 angle (.f64 (pow.f64 b 6) (pow.f64 (PI.f64) 2))))) (pow.f64 a 3))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 a (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))))) (.f64 angle (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2))))) (.f64 -1 (.f64 (pow.f64 a 2) (+.f64 (.f64 -1 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 b 4) (PI.f64))))) (.f64 -1 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 angle (.f64 (pow.f64 b 6) (pow.f64 (PI.f64) 3)))))))))))
(.f64 -1 (/.f64 y-scale (.f64 angle (*.f64 (pow.f64 a 2) (PI.f64)))))
(+.f64 (.f64 -1 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64))))) (.f64 -1 (/.f64 (.f64 y-scale (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (.f64 angle (.f64 (pow.f64 a 3) (pow.f64 (PI.f64) 2))))))
(+.f64 (.f64 -1 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64))))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (.f64 angle (.f64 (pow.f64 a 3) (pow.f64 (PI.f64) 2))))) (.f64 -1 (/.f64 (+.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 angle (PI.f64))) (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 angle (pow.f64 (PI.f64) 3)))) (pow.f64 a 4)))))
(+.f64 (.f64 -1 (/.f64 (+.f64 (/.f64 (.f64 y-scale (.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) (pow.f64 b 2))) (.f64 angle (pow.f64 (PI.f64) 2))) (/.f64 (.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) (+.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 angle (PI.f64))) (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 angle (pow.f64 (PI.f64) 3))))) (PI.f64))) (pow.f64 a 5))) (+.f64 (.f64 -1 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64))))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (.f64 angle (.f64 (pow.f64 a 3) (pow.f64 (PI.f64) 2))))) (.f64 -1 (/.f64 (+.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 angle (PI.f64))) (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 angle (pow.f64 (PI.f64) 3)))) (pow.f64 a 4))))))
(.f64 -1 (/.f64 y-scale (.f64 angle (*.f64 (pow.f64 a 2) (PI.f64)))))
(+.f64 (.f64 -1 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64))))) (/.f64 (.f64 y-scale (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (.f64 angle (*.f64 (pow.f64 a 3) (pow.f64 (PI.f64) 2)))))
(+.f64 (.f64 -1 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64))))) (+.f64 (/.f64 (.f64 y-scale (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (.f64 angle (.f64 (pow.f64 a 3) (pow.f64 (PI.f64) 2)))) (.f64 -1 (/.f64 (+.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 angle (PI.f64))) (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (*.f64 angle (pow.f64 (PI.f64) 3)))) (pow.f64 a 4)))))
(+.f64 (/.f64 (.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) (+.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 angle (PI.f64))) (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 angle (pow.f64 (PI.f64) 3))))) (.f64 (pow.f64 a 5) (PI.f64))) (+.f64 (.f64 -1 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64))))) (+.f64 (/.f64 (.f64 y-scale (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (.f64 angle (.f64 (pow.f64 a 3) (pow.f64 (PI.f64) 2)))) (+.f64 (/.f64 (.f64 y-scale (.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) (pow.f64 b 2))) (.f64 angle (.f64 (pow.f64 a 5) (pow.f64 (PI.f64) 2)))) (.f64 -1 (/.f64 (+.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 angle (PI.f64))) (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 angle (pow.f64 (PI.f64) 3)))) (pow.f64 a 4)))))))
(.f64 y-scale (.f64 (/.f64 1 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2))))
(.f64 y-scale (/.f64 1 (.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))))))))
(.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) 2)))
(.f64 x-scale (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) 2)))
(.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2))) 1)
(.f64 1 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2))))
(.f64 (sqrt.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2)))) (sqrt.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) 2)))))
(.f64 (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (.f64 (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) 2))))
(.f64 (cbrt.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2)))) (cbrt.f64 (pow.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) 2))) 2)))
(.f64 (cbrt.f64 (pow.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2))) 2)) (cbrt.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) 2)))))
(.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) 2)) (.f64 (cbrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) 2))))
(.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) 2)) x-scale)
(.f64 (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2)) (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a))))))
(.f64 (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2) (/.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (/.f64 1 x-scale)))
(.f64 (/.f64 (neg.f64 y-scale) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (/.f64 1 (/.f64 -1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))))
(.f64 (.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2)) 1) x-scale)
(.f64 (.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2)) (sqrt.f64 x-scale)) (sqrt.f64 x-scale))
(.f64 (.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2)) (cbrt.f64 (*.f64 x-scale x-scale))) (cbrt.f64 x-scale))
(.f64 (/.f64 1 (sqrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))) (/.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (sqrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))))
(.f64 (/.f64 1 (cbrt.f64 (pow.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) 2))) (/.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (cbrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))))
(.f64 (/.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) 1) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) 2)))
(.f64 (/.f64 y-scale 1) (/.f64 (/.f64 1 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))))
(.f64 (/.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) 1/2) (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (/.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (/.f64 -1/2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (neg.f64 x-scale))
(.f64 (pow.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2))) 1/2) (pow.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) 2))) 1/2))
(.f64 (/.f64 (sqrt.f64 y-scale) (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))) (/.f64 (sqrt.f64 y-scale) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))))
(.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))) (/.f64 (cbrt.f64 y-scale) (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a))))))
(.f64 (/.f64 y-scale (/.f64 1/2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) (/.f64 (/.f64 1 (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a))))) (/.f64 1 x-scale)))
(.f64 (/.f64 y-scale (sqrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))) (/.f64 (/.f64 1 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (sqrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))))
(.f64 (/.f64 y-scale (cbrt.f64 (pow.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) 2))) (/.f64 (/.f64 1 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (cbrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))))
(.f64 (/.f64 (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (/.f64 1/2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) (/.f64 (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (/.f64 1 x-scale)))
(.f64 (/.f64 (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) 1) (/.f64 (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))))))
(.f64 (/.f64 (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (sqrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))) (/.f64 (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (sqrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))))))))
(.f64 (/.f64 (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (cbrt.f64 (pow.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) 2))) (/.f64 (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (cbrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))))))))
(.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) 2)) (/.f64 1/2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) (/.f64 (cbrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (/.f64 1 x-scale)))
(.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) 2)) 1) (/.f64 (cbrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))))))
(.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) 2)) (sqrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))) (/.f64 (cbrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (sqrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))))))))
(.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) 2)) (cbrt.f64 (pow.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) 2))) (/.f64 (cbrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (cbrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))))))))
(pow.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) 2))) 1)
(neg.f64 (/.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (/.f64 -1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))))))
(log.f64 (exp.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) 2)))))
(cbrt.f64 (.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2))) (pow.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) 2))) 2)))
(expm1.f64 (log1p.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) 2)))))
(exp.f64 (log.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) 2)))))
(log1p.f64 (expm1.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) 2)))))
(pow.f64 (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))) 1)
(log.f64 (exp.f64 (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a))))))
(cbrt.f64 (.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) (pow.f64 (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))) 2)))
(expm1.f64 (log1p.f64 (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a))))))
(exp.f64 (log.f64 (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a))))))
(log1p.f64 (expm1.f64 (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a))))))
(.f64 b (/.f64 1 (.f64 x-scale x-scale)))
(.f64 (/.f64 b (.f64 x-scale x-scale)) 1)
(.f64 1 (/.f64 b (.f64 x-scale x-scale)))
(.f64 (sqrt.f64 (/.f64 b (.f64 x-scale x-scale))) (sqrt.f64 (/.f64 b (*.f64 x-scale x-scale))))
(.f64 (sqrt.f64 b) (.f64 (sqrt.f64 b) (/.f64 1 (*.f64 x-scale x-scale))))
(.f64 (cbrt.f64 (/.f64 b (.f64 x-scale x-scale))) (cbrt.f64 (pow.f64 (/.f64 b (*.f64 x-scale x-scale)) 2)))
(.f64 (cbrt.f64 (pow.f64 (/.f64 b (.f64 x-scale x-scale)) 2)) (cbrt.f64 (/.f64 b (*.f64 x-scale x-scale))))
(.f64 (cbrt.f64 (.f64 b b)) (.f64 (cbrt.f64 b) (/.f64 1 (.f64 x-scale x-scale))))
(*.f64 (/.f64 b x-scale) (/.f64 1 x-scale))
(.f64 (neg.f64 b) (/.f64 1 (.f64 x-scale (neg.f64 x-scale))))
(.f64 (/.f64 1 (.f64 x-scale x-scale)) b)
(*.f64 (/.f64 1 x-scale) (/.f64 b x-scale))
(.f64 (/.f64 1 (sqrt.f64 (.f64 x-scale x-scale))) (/.f64 b (sqrt.f64 (*.f64 x-scale x-scale))))
(.f64 (/.f64 1 (cbrt.f64 (pow.f64 x-scale 4))) (/.f64 b (cbrt.f64 (.f64 x-scale x-scale))))
(.f64 (pow.f64 (/.f64 b (.f64 x-scale x-scale)) 1/2) (pow.f64 (/.f64 b (*.f64 x-scale x-scale)) 1/2))
(.f64 (/.f64 (sqrt.f64 b) 1) (/.f64 (sqrt.f64 b) (.f64 x-scale x-scale)))
(*.f64 (/.f64 (sqrt.f64 b) x-scale) (/.f64 (sqrt.f64 b) x-scale))
(.f64 (/.f64 (cbrt.f64 (.f64 b b)) 1) (/.f64 (cbrt.f64 b) (*.f64 x-scale x-scale)))
(.f64 (/.f64 (sqrt.f64 b) (sqrt.f64 (.f64 x-scale x-scale))) (/.f64 (sqrt.f64 b) (sqrt.f64 (*.f64 x-scale x-scale))))
(.f64 (/.f64 (sqrt.f64 b) (cbrt.f64 (pow.f64 x-scale 4))) (/.f64 (sqrt.f64 b) (cbrt.f64 (.f64 x-scale x-scale))))
(.f64 (/.f64 (cbrt.f64 (.f64 b b)) x-scale) (/.f64 (cbrt.f64 b) x-scale))
(.f64 (/.f64 (cbrt.f64 (.f64 b b)) (sqrt.f64 (.f64 x-scale x-scale))) (/.f64 (cbrt.f64 b) (sqrt.f64 (.f64 x-scale x-scale))))
(.f64 (/.f64 (cbrt.f64 (.f64 b b)) (cbrt.f64 (pow.f64 x-scale 4))) (/.f64 (cbrt.f64 b) (cbrt.f64 (*.f64 x-scale x-scale))))
(pow.f64 (/.f64 b (*.f64 x-scale x-scale)) 1)
(neg.f64 (/.f64 b (*.f64 x-scale (neg.f64 x-scale))))
(log.f64 (exp.f64 (/.f64 b (*.f64 x-scale x-scale))))
(cbrt.f64 (.f64 (/.f64 b (.f64 x-scale x-scale)) (pow.f64 (/.f64 b (*.f64 x-scale x-scale)) 2)))
(expm1.f64 (log1p.f64 (/.f64 b (*.f64 x-scale x-scale))))
(exp.f64 (log.f64 (/.f64 b (*.f64 x-scale x-scale))))
(log1p.f64 (expm1.f64 (/.f64 b (*.f64 x-scale x-scale))))
(.f64 y-scale (/.f64 1 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))))
(.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) 1)
(.f64 1 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))))
(.f64 (sqrt.f64 y-scale) (.f64 (sqrt.f64 y-scale) (/.f64 1 (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))))))
(.f64 (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))))))
(.f64 (cbrt.f64 (.f64 y-scale y-scale)) (.f64 (cbrt.f64 y-scale) (/.f64 1 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))))
(.f64 (cbrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (cbrt.f64 (pow.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a))))) 2)))
(.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) 2)) (cbrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))))))
(.f64 (/.f64 y-scale angle) (/.f64 1 (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))))
(.f64 (/.f64 1 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) y-scale)
(.f64 (neg.f64 y-scale) (/.f64 1 (.f64 angle (neg.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))))
(.f64 (/.f64 1 angle) (/.f64 y-scale (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))))
(.f64 (/.f64 1 (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))) (/.f64 y-scale angle))
(.f64 (/.f64 1 (sqrt.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (/.f64 y-scale (sqrt.f64 (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))))))
(.f64 (/.f64 1 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) 2))) (/.f64 y-scale (cbrt.f64 (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))))))
(.f64 (/.f64 1 (.f64 angle (+.f64 b a))) (/.f64 y-scale (*.f64 (-.f64 b a) (PI.f64))))
(.f64 (pow.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) 1/2) (pow.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a))))) 1/2))
(.f64 (/.f64 (sqrt.f64 y-scale) angle) (/.f64 (sqrt.f64 y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))))
(.f64 (/.f64 (sqrt.f64 y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))) (/.f64 (sqrt.f64 y-scale) angle))
(.f64 (/.f64 (sqrt.f64 y-scale) 1) (/.f64 (sqrt.f64 y-scale) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))))
(.f64 (/.f64 (sqrt.f64 y-scale) (sqrt.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (/.f64 (sqrt.f64 y-scale) (sqrt.f64 (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))))))
(.f64 (/.f64 (sqrt.f64 y-scale) (cbrt.f64 (pow.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) 2))) (/.f64 (sqrt.f64 y-scale) (cbrt.f64 (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))))))
(.f64 (/.f64 (sqrt.f64 y-scale) (.f64 angle (+.f64 b a))) (/.f64 (sqrt.f64 y-scale) (*.f64 (-.f64 b a) (PI.f64))))
(.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) angle) (/.f64 (cbrt.f64 y-scale) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))
(.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) (/.f64 (cbrt.f64 y-scale) angle))
(.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) 1) (/.f64 (cbrt.f64 y-scale) (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a))))))
(.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (sqrt.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (/.f64 (cbrt.f64 y-scale) (sqrt.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))))
(.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (cbrt.f64 (pow.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) 2))) (/.f64 (cbrt.f64 y-scale) (cbrt.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))))
(.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (.f64 angle (+.f64 b a))) (/.f64 (cbrt.f64 y-scale) (.f64 (-.f64 b a) (PI.f64))))
(pow.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a))))) 1)
(neg.f64 (/.f64 y-scale (.f64 angle (neg.f64 (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))))))
(log.f64 (exp.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))))))
(cbrt.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (pow.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a))))) 2)))
(expm1.f64 (log1p.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))))))
(exp.f64 (log.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))))))
(log1p.f64 (expm1.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))))))

Outputs
(.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64)))))))
(.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))))
(.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (/.f64 (.f64 a a) angle) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(+.f64 (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))) (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 b b)) (.f64 (.f64 x-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (/.f64 (.f64 a a) angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (+.f64 a b))) (-.f64 b a)) y-scale))))
(+.f64 (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))) (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 b b)) (.f64 (.f64 x-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (/.f64 (.f64 a a) angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (+.f64 a b))) (-.f64 b a)) y-scale))))
(+.f64 (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))) (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 b b)) (.f64 (.f64 x-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (/.f64 (.f64 a a) angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (+.f64 a b))) (-.f64 b a)) y-scale))))
(.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64)))))))
(.f64 -2 (/.f64 (.f64 y-scale (.f64 b b)) (.f64 (.f64 x-scale angle) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 -2 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (+.f64 a b))) (-.f64 b a)) y-scale)))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 b b)) (.f64 (.f64 x-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (/.f64 (.f64 a a) angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (+.f64 a b))) (-.f64 b a)) y-scale))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 b b)) (.f64 (.f64 x-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (/.f64 (.f64 a a) angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (+.f64 a b))) (-.f64 b a)) y-scale))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 b b)) (.f64 (.f64 x-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (/.f64 (.f64 a a) angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (+.f64 a b))) (-.f64 b a)) y-scale))))
(.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64)))))))
(.f64 -2 (/.f64 (.f64 y-scale (.f64 b b)) (.f64 (.f64 x-scale angle) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 -2 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (+.f64 a b))) (-.f64 b a)) y-scale)))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 b b)) (.f64 (.f64 x-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (/.f64 (.f64 a a) angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (+.f64 a b))) (-.f64 b a)) y-scale))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 b b)) (.f64 (.f64 x-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (/.f64 (.f64 a a) angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (+.f64 a b))) (-.f64 b a)) y-scale))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 b b)) (.f64 (.f64 x-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (/.f64 (.f64 a a) angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (+.f64 a b))) (-.f64 b a)) y-scale))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 (.f64 x-scale y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 (.f64 x-scale y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 (.f64 x-scale y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 (.f64 x-scale y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 (.f64 x-scale y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 (.f64 x-scale y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 (.f64 x-scale y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 (.f64 x-scale y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 (.f64 x-scale y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 (.f64 x-scale y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 (.f64 x-scale y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 2 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 y-scale x-scale)) (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 (.f64 x-scale y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(+.f64 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))) (.f64 -2 (/.f64 (.f64 x-scale (.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) b)) (.f64 y-scale (.f64 angle (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)))))))
(.f64 -2 (+.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 b (.f64 0 (.f64 a (PI.f64)))) (.f64 angle (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)))))))
(.f64 -2 (+.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (.f64 b (.f64 (.f64 0 a) (PI.f64)))) (.f64 y-scale (.f64 (.f64 a a) (*.f64 angle (pow.f64 (PI.f64) 2)))))))
(+.f64 (.f64 2 (.f64 (-.f64 (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64))))) (+.f64 (/.f64 (.f64 x-scale (pow.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) 2)) (.f64 y-scale (.f64 angle (.f64 (pow.f64 a 4) (pow.f64 (PI.f64) 3))))) (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64))))))) (pow.f64 b 2))) (+.f64 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))) (.f64 -2 (/.f64 (.f64 x-scale (.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) b)) (.f64 y-scale (.f64 angle (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))))))))
(fma.f64 2 (.f64 (.f64 b b) (-.f64 (/.f64 y-scale (.f64 x-scale (.f64 (.f64 angle (.f64 a a)) (PI.f64)))) (+.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (pow.f64 (.f64 0 (.f64 a (PI.f64))) 2) (.f64 angle (.f64 (pow.f64 a 4) (pow.f64 (PI.f64) 3))))) (/.f64 x-scale (.f64 y-scale (.f64 (.f64 angle (.f64 a a)) (PI.f64))))))) (.f64 -2 (+.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 b (.f64 0 (.f64 a (PI.f64)))) (.f64 angle (.f64 (*.f64 a a) (pow.f64 (PI.f64) 2))))))))
(fma.f64 2 (.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (.f64 a a) (PI.f64))))) (.f64 (/.f64 x-scale y-scale) (/.f64 (pow.f64 (.f64 (.f64 0 a) (PI.f64)) 2) (.f64 angle (.f64 (pow.f64 a 4) (pow.f64 (PI.f64) 3)))))) (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (.f64 a a) (PI.f64))))))) (.f64 -2 (+.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (.f64 b (.f64 (.f64 0 a) (PI.f64)))) (.f64 y-scale (.f64 (.f64 a a) (.f64 angle (pow.f64 (PI.f64) 2))))))))
(+.f64 (.f64 2 (.f64 (-.f64 (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64))))) (+.f64 (/.f64 (.f64 x-scale (pow.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) 2)) (.f64 y-scale (.f64 angle (.f64 (pow.f64 a 4) (pow.f64 (PI.f64) 3))))) (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64))))))) (pow.f64 b 2))) (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 x-scale (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64))))) (.f64 y-scale (.f64 angle (.f64 (pow.f64 a 4) (pow.f64 (PI.f64) 2))))) (.f64 -1 (/.f64 (.f64 (-.f64 (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64))))) (+.f64 (/.f64 (.f64 x-scale (pow.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) 2)) (.f64 y-scale (.f64 angle (.f64 (pow.f64 a 4) (pow.f64 (PI.f64) 3))))) (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64))))))) (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64))))) (.f64 (pow.f64 a 2) (PI.f64))))) (pow.f64 b 3))) (+.f64 (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))) (.f64 -2 (/.f64 (.f64 x-scale (.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) b)) (.f64 y-scale (.f64 angle (*.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)))))))))
(fma.f64 2 (.f64 (.f64 b b) (-.f64 (/.f64 y-scale (.f64 x-scale (.f64 (.f64 angle (.f64 a a)) (PI.f64)))) (+.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (pow.f64 (.f64 0 (.f64 a (PI.f64))) 2) (.f64 angle (.f64 (pow.f64 a 4) (pow.f64 (PI.f64) 3))))) (/.f64 x-scale (.f64 y-scale (.f64 (.f64 angle (.f64 a a)) (PI.f64))))))) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 x-scale (.f64 0 (.f64 a (PI.f64)))) (.f64 y-scale (.f64 angle (.f64 (pow.f64 (PI.f64) 2) (pow.f64 a 4))))) (neg.f64 (/.f64 (-.f64 (/.f64 y-scale (.f64 x-scale (.f64 (.f64 angle (.f64 a a)) (PI.f64)))) (+.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (pow.f64 (.f64 0 (.f64 a (PI.f64))) 2) (.f64 angle (.f64 (pow.f64 a 4) (pow.f64 (PI.f64) 3))))) (/.f64 x-scale (.f64 y-scale (.f64 (.f64 angle (.f64 a a)) (PI.f64)))))) (/.f64 (.f64 (.f64 a a) (PI.f64)) (.f64 0 (.f64 a (PI.f64))))))) (pow.f64 b 3)) (.f64 -2 (+.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 b (.f64 0 (.f64 a (PI.f64)))) (.f64 angle (.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)))))))))
(fma.f64 2 (.f64 (.f64 b b) (-.f64 (-.f64 (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (.f64 a a) (PI.f64))))) (.f64 (/.f64 x-scale y-scale) (/.f64 (pow.f64 (.f64 (.f64 0 a) (PI.f64)) 2) (.f64 angle (.f64 (pow.f64 a 4) (pow.f64 (PI.f64) 3)))))) (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (.f64 a a) (PI.f64))))))) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 x-scale (.f64 (.f64 0 a) (PI.f64))) (.f64 (.f64 y-scale (.f64 angle (pow.f64 a 4))) (pow.f64 (PI.f64) 2))) (neg.f64 (.f64 (/.f64 (-.f64 (-.f64 (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (.f64 a a) (PI.f64))))) (.f64 (/.f64 x-scale y-scale) (/.f64 (pow.f64 (.f64 (.f64 0 a) (PI.f64)) 2) (.f64 angle (.f64 (pow.f64 a 4) (pow.f64 (PI.f64) 3)))))) (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (.f64 a a) (PI.f64)))))) (.f64 a a)) (/.f64 (.f64 (.f64 0 a) (PI.f64)) (PI.f64))))) (pow.f64 b 3)) (.f64 -2 (+.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (.f64 b (.f64 (.f64 0 a) (PI.f64)))) (.f64 y-scale (.f64 (.f64 a a) (.f64 angle (pow.f64 (PI.f64) 2)))))))))
(.f64 -2 (/.f64 y-scale (.f64 x-scale (*.f64 angle (PI.f64)))))
(.f64 -2 (/.f64 y-scale (.f64 (*.f64 x-scale angle) (PI.f64))))
(+.f64 (.f64 -2 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64))))) (.f64 2 (/.f64 (.f64 y-scale (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 angle 2) (*.f64 b (pow.f64 (PI.f64) 2)))))))
(fma.f64 -2 (/.f64 y-scale (.f64 (.f64 x-scale angle) (PI.f64))) (.f64 2 (/.f64 (.f64 y-scale (.f64 0 (.f64 (.f64 angle a) (PI.f64)))) (.f64 x-scale (.f64 (.f64 angle angle) (*.f64 b (pow.f64 (PI.f64) 2)))))))
(fma.f64 -2 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64)))) (.f64 2 (/.f64 y-scale (/.f64 (.f64 (.f64 (.f64 x-scale (.f64 angle angle)) b) (pow.f64 (PI.f64) 2)) (.f64 (.f64 0 (.f64 angle a)) (PI.f64))))))
(+.f64 (.f64 -2 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64))))) (+.f64 (.f64 2 (/.f64 (.f64 y-scale (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 angle 2) (.f64 b (pow.f64 (PI.f64) 2)))))) (.f64 2 (/.f64 (-.f64 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (PI.f64)))) (+.f64 (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 x-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64)))) 2)) (.f64 x-scale (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)))))) (pow.f64 b 2)))))
(fma.f64 -2 (/.f64 y-scale (.f64 (.f64 x-scale angle) (PI.f64))) (.f64 2 (+.f64 (/.f64 (.f64 y-scale (.f64 0 (.f64 (.f64 angle a) (PI.f64)))) (.f64 x-scale (.f64 (.f64 angle angle) (.f64 b (pow.f64 (PI.f64) 2))))) (/.f64 (-.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64)))) (+.f64 (/.f64 (.f64 (.f64 a a) y-scale) (.f64 (.f64 x-scale angle) (PI.f64))) (.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (.f64 0 (.f64 (.f64 angle a) (PI.f64))) 2) (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)))))) (.f64 b b)))))
(fma.f64 -2 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64)))) (.f64 2 (+.f64 (/.f64 y-scale (/.f64 (.f64 (.f64 (.f64 x-scale (.f64 angle angle)) b) (pow.f64 (PI.f64) 2)) (.f64 (.f64 0 (.f64 angle a)) (PI.f64)))) (/.f64 (-.f64 (/.f64 x-scale (/.f64 (.f64 y-scale angle) (/.f64 (.f64 a a) (PI.f64)))) (+.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (/.f64 (.f64 a a) (PI.f64)) angle)) (.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (.f64 (.f64 0 (.f64 angle a)) (PI.f64)) 2) (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)))))) (.f64 b b)))))
(+.f64 (.f64 -2 (/.f64 (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64)))))) (.f64 x-scale (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))) (/.f64 (.f64 (-.f64 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (PI.f64)))) (+.f64 (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 x-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64)))) 2)) (.f64 x-scale (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)))))) (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64))))) (.f64 angle (PI.f64)))) (pow.f64 b 3))) (+.f64 (.f64 -2 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64))))) (+.f64 (.f64 2 (/.f64 (.f64 y-scale (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 angle 2) (.f64 b (pow.f64 (PI.f64) 2)))))) (.f64 2 (/.f64 (-.f64 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (PI.f64)))) (+.f64 (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 x-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64)))) 2)) (.f64 x-scale (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)))))) (pow.f64 b 2))))))
(fma.f64 -2 (/.f64 (fma.f64 -1 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (.f64 a a) (.f64 0 (.f64 (.f64 angle a) (PI.f64)))) (.f64 (pow.f64 (PI.f64) 2) (.f64 angle angle)))) (.f64 (/.f64 (-.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64)))) (+.f64 (/.f64 (.f64 (.f64 a a) y-scale) (.f64 (.f64 x-scale angle) (PI.f64))) (.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (.f64 0 (.f64 (.f64 angle a) (PI.f64))) 2) (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)))))) angle) (/.f64 (.f64 0 (.f64 (.f64 angle a) (PI.f64))) (PI.f64)))) (pow.f64 b 3)) (fma.f64 -2 (/.f64 y-scale (.f64 (.f64 x-scale angle) (PI.f64))) (.f64 2 (+.f64 (/.f64 (.f64 y-scale (.f64 0 (.f64 (.f64 angle a) (PI.f64)))) (.f64 x-scale (.f64 (.f64 angle angle) (.f64 b (pow.f64 (PI.f64) 2))))) (/.f64 (-.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64)))) (+.f64 (/.f64 (.f64 (.f64 a a) y-scale) (.f64 (.f64 x-scale angle) (PI.f64))) (.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (.f64 0 (.f64 (.f64 angle a) (PI.f64))) 2) (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)))))) (.f64 b b))))))
(fma.f64 -2 (/.f64 (fma.f64 -1 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 0 (.f64 angle (.f64 (PI.f64) (pow.f64 a 3)))) (.f64 (pow.f64 (PI.f64) 2) (.f64 angle angle)))) (.f64 (/.f64 (-.f64 (/.f64 x-scale (/.f64 (.f64 y-scale angle) (/.f64 (.f64 a a) (PI.f64)))) (+.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (/.f64 (.f64 a a) (PI.f64)) angle)) (.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (.f64 (.f64 0 (.f64 angle a)) (PI.f64)) 2) (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)))))) angle) (/.f64 (.f64 (.f64 0 (.f64 angle a)) (PI.f64)) (PI.f64)))) (pow.f64 b 3)) (fma.f64 -2 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64)))) (.f64 2 (+.f64 (/.f64 y-scale (/.f64 (.f64 (.f64 (.f64 x-scale (.f64 angle angle)) b) (pow.f64 (PI.f64) 2)) (.f64 (.f64 0 (.f64 angle a)) (PI.f64)))) (/.f64 (-.f64 (/.f64 x-scale (/.f64 (.f64 y-scale angle) (/.f64 (.f64 a a) (PI.f64)))) (+.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (/.f64 (.f64 a a) (PI.f64)) angle)) (.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (.f64 (.f64 0 (.f64 angle a)) (PI.f64)) 2) (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)))))) (*.f64 b b))))))
(.f64 -2 (/.f64 y-scale (.f64 x-scale (*.f64 angle (PI.f64)))))
(.f64 -2 (/.f64 y-scale (.f64 (*.f64 x-scale angle) (PI.f64))))
(+.f64 (.f64 -2 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64))))) (.f64 2 (/.f64 (.f64 y-scale (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 angle 2) (*.f64 b (pow.f64 (PI.f64) 2)))))))
(fma.f64 -2 (/.f64 y-scale (.f64 (.f64 x-scale angle) (PI.f64))) (.f64 2 (/.f64 (.f64 y-scale (.f64 0 (.f64 (.f64 angle a) (PI.f64)))) (.f64 x-scale (.f64 (.f64 angle angle) (*.f64 b (pow.f64 (PI.f64) 2)))))))
(fma.f64 -2 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64)))) (.f64 2 (/.f64 y-scale (/.f64 (.f64 (.f64 (.f64 x-scale (.f64 angle angle)) b) (pow.f64 (PI.f64) 2)) (.f64 (.f64 0 (.f64 angle a)) (PI.f64))))))
(+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (PI.f64))))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64)))) 2)) (.f64 x-scale (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))))) (.f64 -1 (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 x-scale (.f64 angle (PI.f64))))))) (pow.f64 b 2))) (+.f64 (.f64 -2 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64))))) (.f64 2 (/.f64 (.f64 y-scale (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 angle 2) (*.f64 b (pow.f64 (PI.f64) 2))))))))
(fma.f64 -2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64))))) (fma.f64 -1 (.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (.f64 0 (.f64 (.f64 angle a) (PI.f64))) 2) (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)))) (neg.f64 (/.f64 (.f64 (.f64 a a) y-scale) (.f64 (.f64 x-scale angle) (PI.f64)))))) (.f64 b b)) (fma.f64 -2 (/.f64 y-scale (.f64 (.f64 x-scale angle) (PI.f64))) (.f64 2 (/.f64 (.f64 y-scale (.f64 0 (.f64 (.f64 angle a) (PI.f64)))) (.f64 x-scale (.f64 (.f64 angle angle) (.f64 b (pow.f64 (PI.f64) 2))))))))
(fma.f64 -2 (/.f64 (-.f64 (/.f64 (neg.f64 x-scale) (/.f64 (.f64 y-scale angle) (/.f64 (.f64 a a) (PI.f64)))) (fma.f64 -1 (.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (.f64 (.f64 0 (.f64 angle a)) (PI.f64)) 2) (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)))) (/.f64 (/.f64 (.f64 (neg.f64 y-scale) (.f64 a a)) (.f64 angle (PI.f64))) x-scale))) (.f64 b b)) (fma.f64 -2 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64)))) (.f64 2 (/.f64 y-scale (/.f64 (.f64 (.f64 (.f64 x-scale (.f64 angle angle)) b) (pow.f64 (PI.f64) 2)) (.f64 (.f64 0 (*.f64 angle a)) (PI.f64)))))))
(+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 -1 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (PI.f64))))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64)))) 2)) (.f64 x-scale (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))))) (.f64 -1 (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 x-scale (.f64 angle (PI.f64))))))) (pow.f64 b 2))) (+.f64 (.f64 -2 (/.f64 (+.f64 (.f64 -1 (/.f64 (.f64 (-.f64 (.f64 -1 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (PI.f64))))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64)))) 2)) (.f64 x-scale (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))))) (.f64 -1 (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 x-scale (.f64 angle (PI.f64))))))) (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64))))) (.f64 angle (PI.f64)))) (.f64 -1 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64)))))) (.f64 x-scale (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2)))))) (pow.f64 b 3))) (+.f64 (.f64 -2 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64))))) (.f64 2 (/.f64 (.f64 y-scale (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64))))) (.f64 x-scale (.f64 (pow.f64 angle 2) (*.f64 b (pow.f64 (PI.f64) 2)))))))))
(fma.f64 -2 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64))))) (fma.f64 -1 (.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (.f64 0 (.f64 (.f64 angle a) (PI.f64))) 2) (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)))) (neg.f64 (/.f64 (.f64 (.f64 a a) y-scale) (.f64 (.f64 x-scale angle) (PI.f64)))))) (.f64 b b)) (fma.f64 -2 (/.f64 (fma.f64 -1 (/.f64 (-.f64 (neg.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (PI.f64))))) (fma.f64 -1 (.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (.f64 0 (.f64 (.f64 angle a) (PI.f64))) 2) (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)))) (neg.f64 (/.f64 (.f64 (.f64 a a) y-scale) (.f64 (.f64 x-scale angle) (PI.f64)))))) (/.f64 (.f64 angle (PI.f64)) (.f64 0 (.f64 (.f64 angle a) (PI.f64))))) (neg.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (.f64 a a) (.f64 0 (.f64 (.f64 angle a) (PI.f64)))) (.f64 (pow.f64 (PI.f64) 2) (.f64 angle angle)))))) (pow.f64 b 3)) (fma.f64 -2 (/.f64 y-scale (.f64 (.f64 x-scale angle) (PI.f64))) (.f64 2 (/.f64 (.f64 y-scale (.f64 0 (.f64 (.f64 angle a) (PI.f64)))) (.f64 x-scale (.f64 (.f64 angle angle) (.f64 b (pow.f64 (PI.f64) 2)))))))))
(+.f64 (fma.f64 -2 (/.f64 (-.f64 (/.f64 (neg.f64 x-scale) (/.f64 (.f64 y-scale angle) (/.f64 (.f64 a a) (PI.f64)))) (fma.f64 -1 (.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (.f64 (.f64 0 (.f64 angle a)) (PI.f64)) 2) (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)))) (/.f64 (/.f64 (.f64 (neg.f64 y-scale) (.f64 a a)) (.f64 angle (PI.f64))) x-scale))) (.f64 b b)) (fma.f64 -2 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64)))) (.f64 2 (/.f64 y-scale (/.f64 (.f64 (.f64 (.f64 x-scale (.f64 angle angle)) b) (pow.f64 (PI.f64) 2)) (.f64 (.f64 0 (.f64 angle a)) (PI.f64))))))) (/.f64 (.f64 2 (+.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 0 (.f64 angle (.f64 (PI.f64) (pow.f64 a 3)))) (.f64 (pow.f64 (PI.f64) 2) (.f64 angle angle)))) (.f64 (/.f64 (-.f64 (/.f64 (neg.f64 x-scale) (/.f64 (.f64 y-scale angle) (/.f64 (.f64 a a) (PI.f64)))) (fma.f64 -1 (.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (.f64 (.f64 0 (.f64 angle a)) (PI.f64)) 2) (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)))) (/.f64 (/.f64 (.f64 (neg.f64 y-scale) (.f64 a a)) (.f64 angle (PI.f64))) x-scale))) angle) (/.f64 (.f64 (.f64 0 (.f64 angle a)) (PI.f64)) (PI.f64))))) (pow.f64 b 3)))
(.f64 -2 (/.f64 y-scale (.f64 x-scale (*.f64 angle (PI.f64)))))
(.f64 -2 (/.f64 y-scale (.f64 (*.f64 x-scale angle) (PI.f64))))
(+.f64 (.f64 2 (/.f64 (.f64 y-scale (.f64 a (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))))) (.f64 x-scale (.f64 angle (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))))) (.f64 -2 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64))))))
(fma.f64 2 (/.f64 y-scale (/.f64 (.f64 x-scale (.f64 angle (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (.f64 a (.f64 0 (.f64 b (PI.f64)))))) (.f64 -2 (/.f64 y-scale (.f64 (.f64 x-scale angle) (PI.f64)))))
(fma.f64 2 (.f64 (/.f64 y-scale x-scale) (/.f64 a (/.f64 (.f64 angle (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 0 (.f64 b (PI.f64)))))) (.f64 -2 (/.f64 y-scale (.f64 x-scale (*.f64 angle (PI.f64))))))
(+.f64 (.f64 2 (/.f64 (.f64 y-scale (.f64 a (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))))) (.f64 x-scale (.f64 angle (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (-.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64))))) (+.f64 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 x-scale (.f64 angle (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 3))))) (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64))))))))) (.f64 -2 (/.f64 y-scale (.f64 x-scale (*.f64 angle (PI.f64)))))))
(fma.f64 2 (/.f64 y-scale (/.f64 (.f64 x-scale (.f64 angle (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (.f64 a (.f64 0 (.f64 b (PI.f64)))))) (fma.f64 2 (.f64 (.f64 a a) (-.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (PI.f64) (.f64 b b))))) (+.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (.f64 0 (.f64 b (PI.f64))) 2) (.f64 angle (.f64 (pow.f64 (PI.f64) 3) (pow.f64 b 4))))) (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (PI.f64) (.f64 b b)))))))) (.f64 -2 (/.f64 y-scale (.f64 (*.f64 x-scale angle) (PI.f64))))))
(fma.f64 2 (.f64 (/.f64 y-scale x-scale) (/.f64 a (/.f64 (.f64 angle (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 0 (.f64 b (PI.f64)))))) (fma.f64 2 (.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 x-scale (.f64 (.f64 y-scale (.f64 angle (PI.f64))) (.f64 b b))) (/.f64 y-scale (.f64 (.f64 x-scale (.f64 angle (PI.f64))) (.f64 b b)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (.f64 0 (.f64 b (PI.f64))) 2) (.f64 angle (.f64 (pow.f64 (PI.f64) 3) (pow.f64 b 4))))))) (.f64 -2 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64)))))))
(+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (-.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64))))) (+.f64 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 x-scale (.f64 angle (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 3))))) (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64))))))) (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (.f64 (pow.f64 b 2) (PI.f64))) (.f64 -1 (/.f64 (.f64 y-scale (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (.f64 x-scale (.f64 angle (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2))))))) (pow.f64 a 3))) (+.f64 (.f64 2 (/.f64 (.f64 y-scale (.f64 a (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))))) (.f64 x-scale (.f64 angle (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (-.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64))))) (+.f64 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 x-scale (.f64 angle (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 3))))) (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64))))))))) (.f64 -2 (/.f64 y-scale (.f64 x-scale (*.f64 angle (PI.f64))))))))
(fma.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (-.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (PI.f64) (.f64 b b))))) (+.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (.f64 0 (.f64 b (PI.f64))) 2) (.f64 angle (.f64 (pow.f64 (PI.f64) 3) (pow.f64 b 4))))) (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (PI.f64) (.f64 b b))))))) (.f64 b b)) (/.f64 (.f64 0 (.f64 b (PI.f64))) (PI.f64))) (neg.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 0 (.f64 b (PI.f64))) (.f64 angle (.f64 (pow.f64 (PI.f64) 2) (pow.f64 b 4))))))) (pow.f64 a 3)) (fma.f64 2 (/.f64 y-scale (/.f64 (.f64 x-scale (.f64 angle (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (.f64 a (.f64 0 (.f64 b (PI.f64)))))) (fma.f64 2 (.f64 (.f64 a a) (-.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (.f64 (PI.f64) (.f64 b b))))) (+.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (.f64 0 (.f64 b (PI.f64))) 2) (.f64 angle (.f64 (pow.f64 (PI.f64) 3) (pow.f64 b 4))))) (/.f64 y-scale (.f64 x-scale (.f64 angle (.f64 (PI.f64) (.f64 b b)))))))) (.f64 -2 (/.f64 y-scale (.f64 (.f64 x-scale angle) (PI.f64)))))))
(fma.f64 -2 (.f64 (+.f64 (.f64 (/.f64 (-.f64 (-.f64 (/.f64 x-scale (.f64 (.f64 y-scale (.f64 angle (PI.f64))) (.f64 b b))) (/.f64 y-scale (.f64 (.f64 x-scale (.f64 angle (PI.f64))) (.f64 b b)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (.f64 0 (.f64 b (PI.f64))) 2) (.f64 angle (.f64 (pow.f64 (PI.f64) 3) (pow.f64 b 4)))))) (.f64 b b)) (/.f64 (.f64 0 (.f64 b (PI.f64))) (PI.f64))) (/.f64 (neg.f64 y-scale) (/.f64 (.f64 (.f64 (.f64 x-scale angle) (pow.f64 b 4)) (pow.f64 (PI.f64) 2)) (.f64 0 (.f64 b (PI.f64)))))) (pow.f64 a 3)) (fma.f64 2 (.f64 (/.f64 y-scale x-scale) (/.f64 a (/.f64 (.f64 angle (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 0 (.f64 b (PI.f64)))))) (fma.f64 2 (.f64 (.f64 a a) (-.f64 (-.f64 (/.f64 x-scale (.f64 (.f64 y-scale (.f64 angle (PI.f64))) (.f64 b b))) (/.f64 y-scale (.f64 (.f64 x-scale (.f64 angle (PI.f64))) (.f64 b b)))) (.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (.f64 0 (.f64 b (PI.f64))) 2) (.f64 angle (.f64 (pow.f64 (PI.f64) 3) (pow.f64 b 4))))))) (.f64 -2 (/.f64 y-scale (.f64 x-scale (*.f64 angle (PI.f64))))))))
(.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(+.f64 (.f64 -2 (/.f64 (.f64 x-scale (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (.f64 y-scale (.f64 angle (.f64 a (pow.f64 (PI.f64) 2)))))) (.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64))))))
(.f64 -2 (+.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 0 (.f64 b (PI.f64))) (.f64 angle (.f64 a (pow.f64 (PI.f64) 2))))) (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))
(.f64 -2 (+.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 0 (.f64 b (PI.f64))) (.f64 a (.f64 angle (pow.f64 (PI.f64) 2)))))))
(+.f64 (.f64 -2 (/.f64 (.f64 x-scale (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (.f64 y-scale (.f64 angle (.f64 a (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 2 (/.f64 (-.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (PI.f64)))) (+.f64 (/.f64 (.f64 x-scale (pow.f64 b 2)) (.f64 y-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 y-scale (.f64 angle (pow.f64 (PI.f64) 3)))))) (pow.f64 a 2))) (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))))
(fma.f64 -2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 0 (.f64 b (PI.f64))) (.f64 angle (.f64 a (pow.f64 (PI.f64) 2))))) (fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (PI.f64)))) (+.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 b b) (.f64 angle (PI.f64)))) (.f64 (/.f64 x-scale y-scale) (/.f64 (pow.f64 (.f64 0 (.f64 b (PI.f64))) 2) (.f64 angle (pow.f64 (PI.f64) 3)))))) (.f64 a a)) (.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))))
(fma.f64 -2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 0 (.f64 b (PI.f64))) (.f64 a (.f64 angle (pow.f64 (PI.f64) 2))))) (fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 b (/.f64 (.f64 angle (PI.f64)) b))) (+.f64 (/.f64 (/.f64 (.f64 b (.f64 b x-scale)) y-scale) (.f64 angle (PI.f64))) (/.f64 (pow.f64 (.f64 0 (.f64 b (PI.f64))) 2) (/.f64 (.f64 y-scale (.f64 angle (pow.f64 (PI.f64) 3))) x-scale)))) (.f64 a a)) (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))))
(+.f64 (.f64 -2 (/.f64 (+.f64 (.f64 -1 (/.f64 (.f64 (-.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (PI.f64)))) (+.f64 (/.f64 (.f64 x-scale (pow.f64 b 2)) (.f64 y-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 y-scale (.f64 angle (pow.f64 (PI.f64) 3)))))) (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (PI.f64))) (/.f64 (.f64 x-scale (.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) (pow.f64 b 2))) (.f64 y-scale (.f64 angle (pow.f64 (PI.f64) 2))))) (pow.f64 a 3))) (+.f64 (.f64 -2 (/.f64 (.f64 x-scale (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (.f64 y-scale (.f64 angle (.f64 a (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 2 (/.f64 (-.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (PI.f64)))) (+.f64 (/.f64 (.f64 x-scale (pow.f64 b 2)) (.f64 y-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 y-scale (.f64 angle (pow.f64 (PI.f64) 3)))))) (pow.f64 a 2))) (.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64))))))))
(fma.f64 -2 (/.f64 (fma.f64 -1 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (PI.f64)))) (+.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 b b) (.f64 angle (PI.f64)))) (.f64 (/.f64 x-scale y-scale) (/.f64 (pow.f64 (.f64 0 (.f64 b (PI.f64))) 2) (.f64 angle (pow.f64 (PI.f64) 3)))))) (/.f64 (PI.f64) (.f64 0 (.f64 b (PI.f64))))) (/.f64 x-scale (/.f64 (.f64 (.f64 y-scale angle) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 0 (.f64 b (PI.f64))))))) (pow.f64 a 3)) (fma.f64 -2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 0 (.f64 b (PI.f64))) (.f64 angle (.f64 a (pow.f64 (PI.f64) 2))))) (fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (PI.f64)))) (+.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 b b) (.f64 angle (PI.f64)))) (.f64 (/.f64 x-scale y-scale) (/.f64 (pow.f64 (.f64 0 (.f64 b (PI.f64))) 2) (.f64 angle (pow.f64 (PI.f64) 3)))))) (.f64 a a)) (.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64))))))))
(fma.f64 -2 (/.f64 (fma.f64 -1 (/.f64 (.f64 0 (.f64 b (PI.f64))) (/.f64 (PI.f64) (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 b (/.f64 (.f64 angle (PI.f64)) b))) (+.f64 (/.f64 (/.f64 (.f64 b (.f64 b x-scale)) y-scale) (.f64 angle (PI.f64))) (/.f64 (pow.f64 (.f64 0 (.f64 b (PI.f64))) 2) (/.f64 (.f64 y-scale (.f64 angle (pow.f64 (PI.f64) 3))) x-scale)))))) (/.f64 x-scale (/.f64 (.f64 y-scale (.f64 angle (pow.f64 (PI.f64) 2))) (.f64 (.f64 b b) (.f64 0 (.f64 b (PI.f64))))))) (pow.f64 a 3)) (fma.f64 -2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 0 (.f64 b (PI.f64))) (.f64 a (.f64 angle (pow.f64 (PI.f64) 2))))) (fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 b (/.f64 (.f64 angle (PI.f64)) b))) (+.f64 (/.f64 (/.f64 (.f64 b (.f64 b x-scale)) y-scale) (.f64 angle (PI.f64))) (/.f64 (pow.f64 (.f64 0 (.f64 b (PI.f64))) 2) (/.f64 (.f64 y-scale (.f64 angle (pow.f64 (PI.f64) 3))) x-scale)))) (.f64 a a)) (.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64))))))))
(.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (.f64 y-scale (.f64 angle (.f64 a (pow.f64 (PI.f64) 2)))))) (.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 0 (.f64 b (PI.f64))) (.f64 angle (.f64 a (pow.f64 (PI.f64) 2))))) (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 0 (.f64 b (PI.f64))) (.f64 a (.f64 angle (pow.f64 (PI.f64) 2))))) (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64))))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (.f64 y-scale (.f64 angle (.f64 a (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 2 (/.f64 (-.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (PI.f64)))) (+.f64 (/.f64 (.f64 x-scale (pow.f64 b 2)) (.f64 y-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 y-scale (.f64 angle (pow.f64 (PI.f64) 3)))))) (pow.f64 a 2))) (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 0 (.f64 b (PI.f64))) (.f64 angle (.f64 a (pow.f64 (PI.f64) 2))))) (fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (PI.f64)))) (+.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 b b) (.f64 angle (PI.f64)))) (.f64 (/.f64 x-scale y-scale) (/.f64 (pow.f64 (.f64 0 (.f64 b (PI.f64))) 2) (.f64 angle (pow.f64 (PI.f64) 3)))))) (.f64 a a)) (.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 0 (.f64 b (PI.f64))) (.f64 a (.f64 angle (pow.f64 (PI.f64) 2))))) (fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 b (/.f64 (.f64 angle (PI.f64)) b))) (+.f64 (/.f64 (/.f64 (.f64 b (.f64 b x-scale)) y-scale) (.f64 angle (PI.f64))) (/.f64 (pow.f64 (.f64 0 (.f64 b (PI.f64))) 2) (/.f64 (.f64 y-scale (.f64 angle (pow.f64 (PI.f64) 3))) x-scale)))) (.f64 a a)) (.f64 -2 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (.f64 y-scale (.f64 angle (.f64 a (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 2 (/.f64 (+.f64 (.f64 -1 (/.f64 (.f64 (-.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (PI.f64)))) (+.f64 (/.f64 (.f64 x-scale (pow.f64 b 2)) (.f64 y-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 y-scale (.f64 angle (pow.f64 (PI.f64) 3)))))) (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (PI.f64))) (/.f64 (.f64 x-scale (.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) (pow.f64 b 2))) (.f64 y-scale (.f64 angle (pow.f64 (PI.f64) 2))))) (pow.f64 a 3))) (+.f64 (.f64 2 (/.f64 (-.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (PI.f64)))) (+.f64 (/.f64 (.f64 x-scale (pow.f64 b 2)) (.f64 y-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 y-scale (.f64 angle (pow.f64 (PI.f64) 3)))))) (pow.f64 a 2))) (.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 0 (.f64 b (PI.f64))) (.f64 angle (.f64 a (pow.f64 (PI.f64) 2))))) (fma.f64 2 (/.f64 (fma.f64 -1 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (PI.f64)))) (+.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 b b) (.f64 angle (PI.f64)))) (.f64 (/.f64 x-scale y-scale) (/.f64 (pow.f64 (.f64 0 (.f64 b (PI.f64))) 2) (.f64 angle (pow.f64 (PI.f64) 3)))))) (/.f64 (PI.f64) (.f64 0 (.f64 b (PI.f64))))) (/.f64 x-scale (/.f64 (.f64 (.f64 y-scale angle) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 0 (.f64 b (PI.f64))))))) (pow.f64 a 3)) (fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 b b) (.f64 angle (PI.f64)))) (+.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 b b) (.f64 angle (PI.f64)))) (.f64 (/.f64 x-scale y-scale) (/.f64 (pow.f64 (.f64 0 (.f64 b (PI.f64))) 2) (.f64 angle (pow.f64 (PI.f64) 3)))))) (.f64 a a)) (.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 0 (.f64 b (PI.f64))) (.f64 a (.f64 angle (pow.f64 (PI.f64) 2))))) (fma.f64 2 (/.f64 (fma.f64 -1 (/.f64 (.f64 0 (.f64 b (PI.f64))) (/.f64 (PI.f64) (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 b (/.f64 (.f64 angle (PI.f64)) b))) (+.f64 (/.f64 (/.f64 (.f64 b (.f64 b x-scale)) y-scale) (.f64 angle (PI.f64))) (/.f64 (pow.f64 (.f64 0 (.f64 b (PI.f64))) 2) (/.f64 (.f64 y-scale (.f64 angle (pow.f64 (PI.f64) 3))) x-scale)))))) (/.f64 x-scale (/.f64 (.f64 y-scale (.f64 angle (pow.f64 (PI.f64) 2))) (.f64 (.f64 b b) (.f64 0 (.f64 b (PI.f64))))))) (pow.f64 a 3)) (fma.f64 2 (/.f64 (-.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 b (/.f64 (.f64 angle (PI.f64)) b))) (+.f64 (/.f64 (/.f64 (.f64 b (.f64 b x-scale)) y-scale) (.f64 angle (PI.f64))) (/.f64 (pow.f64 (.f64 0 (.f64 b (PI.f64))) 2) (/.f64 (.f64 y-scale (.f64 angle (pow.f64 (PI.f64) 3))) x-scale)))) (.f64 a a)) (.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64))))))))
(.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))))
(.f64 -2 (/.f64 (.f64 y-scale (.f64 b b)) (.f64 (.f64 x-scale angle) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 -2 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (+.f64 a b))) (-.f64 b a)) y-scale)))
(+.f64 (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))) (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 b b)) (.f64 (.f64 x-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (/.f64 (.f64 a a) angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (+.f64 a b))) (-.f64 b a)) y-scale))))
(+.f64 (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))) (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 b b)) (.f64 (.f64 x-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (/.f64 (.f64 a a) angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (+.f64 a b))) (-.f64 b a)) y-scale))))
(+.f64 (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))) (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (+.f64 a b) (PI.f64))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 b b)) (.f64 (.f64 x-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (/.f64 (.f64 a a) angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (+.f64 a b))) (-.f64 b a)) y-scale))))
(.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))))
(.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))))
(.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (/.f64 (.f64 a a) angle) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 b b)) (.f64 (.f64 x-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (/.f64 (.f64 a a) angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (+.f64 a b))) (-.f64 b a)) y-scale))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 b b)) (.f64 (.f64 x-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (/.f64 (.f64 a a) angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (+.f64 a b))) (-.f64 b a)) y-scale))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 b b)) (.f64 (.f64 x-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (/.f64 (.f64 a a) angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (+.f64 a b))) (-.f64 b a)) y-scale))))
(.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))))
(.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))))
(.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (/.f64 (.f64 a a) angle) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 b b)) (.f64 (.f64 x-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (/.f64 (.f64 a a) angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (+.f64 a b))) (-.f64 b a)) y-scale))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 b b)) (.f64 (.f64 x-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (/.f64 (.f64 a a) angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (+.f64 a b))) (-.f64 b a)) y-scale))))
(+.f64 (.f64 2 (/.f64 (.f64 x-scale (pow.f64 a 2)) (.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))) (.f64 -2 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 x-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))) (.f64 -2 (/.f64 (.f64 y-scale (.f64 b b)) (.f64 (.f64 x-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))))
(fma.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (/.f64 (.f64 a a) angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (+.f64 a b))) (-.f64 b a)) y-scale))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))
(.f64 -1 (.f64 angle (*.f64 (pow.f64 a 2) (PI.f64))))
(neg.f64 (.f64 (.f64 angle (*.f64 a a)) (PI.f64)))
(neg.f64 (.f64 angle (.f64 (*.f64 a a) (PI.f64))))
(+.f64 (.f64 -1 (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (.f64 angle (.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) b)))
(fma.f64 -1 (.f64 (.f64 angle (.f64 a a)) (PI.f64)) (.f64 angle (.f64 b (.f64 0 (*.f64 a (PI.f64))))))
(fma.f64 -1 (.f64 angle (.f64 (.f64 a a) (PI.f64))) (.f64 angle (.f64 b (.f64 (*.f64 0 a) (PI.f64)))))
(+.f64 (.f64 -1 (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (+.f64 (.f64 angle (.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) b)) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))))
(fma.f64 -1 (.f64 (.f64 angle (.f64 a a)) (PI.f64)) (.f64 angle (+.f64 (.f64 b (.f64 0 (.f64 a (PI.f64)))) (.f64 (PI.f64) (*.f64 b b)))))
(fma.f64 -1 (.f64 angle (.f64 (.f64 a a) (PI.f64))) (.f64 angle (+.f64 (.f64 b (.f64 (.f64 0 a) (PI.f64))) (.f64 b (*.f64 b (PI.f64))))))
(+.f64 (.f64 -1 (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (+.f64 (.f64 angle (.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) b)) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))))
(fma.f64 -1 (.f64 (.f64 angle (.f64 a a)) (PI.f64)) (.f64 angle (+.f64 (.f64 b (.f64 0 (.f64 a (PI.f64)))) (.f64 (PI.f64) (*.f64 b b)))))
(fma.f64 -1 (.f64 angle (.f64 (.f64 a a) (PI.f64))) (.f64 angle (+.f64 (.f64 b (.f64 (.f64 0 a) (PI.f64))) (.f64 b (*.f64 b (PI.f64))))))
(.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))
(.f64 angle (.f64 (PI.f64) (*.f64 b b)))
(.f64 angle (.f64 b (*.f64 b (PI.f64))))
(+.f64 (.f64 (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64)))) b) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64))))
(fma.f64 (.f64 0 (.f64 (.f64 angle a) (PI.f64))) b (.f64 angle (.f64 (PI.f64) (.f64 b b))))
(.f64 angle (+.f64 (.f64 b (.f64 (.f64 0 a) (PI.f64))) (.f64 b (.f64 b (PI.f64)))))
(+.f64 (.f64 (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64)))) b) (+.f64 (.f64 -1 (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (.f64 angle (*.f64 (pow.f64 b 2) (PI.f64)))))
(fma.f64 -1 (.f64 (.f64 angle (.f64 a a)) (PI.f64)) (.f64 angle (+.f64 (.f64 b (.f64 0 (.f64 a (PI.f64)))) (.f64 (PI.f64) (*.f64 b b)))))
(fma.f64 -1 (.f64 angle (.f64 (.f64 a a) (PI.f64))) (.f64 angle (+.f64 (.f64 b (.f64 (.f64 0 a) (PI.f64))) (.f64 b (*.f64 b (PI.f64))))))
(+.f64 (.f64 (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64)))) b) (+.f64 (.f64 -1 (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (.f64 angle (*.f64 (pow.f64 b 2) (PI.f64)))))
(fma.f64 -1 (.f64 (.f64 angle (.f64 a a)) (PI.f64)) (.f64 angle (+.f64 (.f64 b (.f64 0 (.f64 a (PI.f64)))) (.f64 (PI.f64) (*.f64 b b)))))
(fma.f64 -1 (.f64 angle (.f64 (.f64 a a) (PI.f64))) (.f64 angle (+.f64 (.f64 b (.f64 (.f64 0 a) (PI.f64))) (.f64 b (*.f64 b (PI.f64))))))
(.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))
(.f64 angle (.f64 (PI.f64) (*.f64 b b)))
(.f64 angle (.f64 b (*.f64 b (PI.f64))))
(+.f64 (.f64 (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64)))) b) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64))))
(fma.f64 (.f64 0 (.f64 (.f64 angle a) (PI.f64))) b (.f64 angle (.f64 (PI.f64) (.f64 b b))))
(.f64 angle (+.f64 (.f64 b (.f64 (.f64 0 a) (PI.f64))) (.f64 b (.f64 b (PI.f64)))))
(+.f64 (.f64 (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64)))) b) (+.f64 (.f64 -1 (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (.f64 angle (*.f64 (pow.f64 b 2) (PI.f64)))))
(fma.f64 -1 (.f64 (.f64 angle (.f64 a a)) (PI.f64)) (.f64 angle (+.f64 (.f64 b (.f64 0 (.f64 a (PI.f64)))) (.f64 (PI.f64) (*.f64 b b)))))
(fma.f64 -1 (.f64 angle (.f64 (.f64 a a) (PI.f64))) (.f64 angle (+.f64 (.f64 b (.f64 (.f64 0 a) (PI.f64))) (.f64 b (*.f64 b (PI.f64))))))
(+.f64 (.f64 (+.f64 (.f64 -1 (.f64 angle (.f64 a (PI.f64)))) (.f64 angle (.f64 a (PI.f64)))) b) (+.f64 (.f64 -1 (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (.f64 angle (*.f64 (pow.f64 b 2) (PI.f64)))))
(fma.f64 -1 (.f64 (.f64 angle (.f64 a a)) (PI.f64)) (.f64 angle (+.f64 (.f64 b (.f64 0 (.f64 a (PI.f64)))) (.f64 (PI.f64) (*.f64 b b)))))
(fma.f64 -1 (.f64 angle (.f64 (.f64 a a) (PI.f64))) (.f64 angle (+.f64 (.f64 b (.f64 (.f64 0 a) (PI.f64))) (.f64 b (*.f64 b (PI.f64))))))
(.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))
(.f64 angle (.f64 (PI.f64) (*.f64 b b)))
(.f64 angle (.f64 b (*.f64 b (PI.f64))))
(+.f64 (.f64 angle (.f64 a (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))))) (.f64 angle (*.f64 (pow.f64 b 2) (PI.f64))))
(.f64 angle (+.f64 (.f64 a (.f64 0 (.f64 b (PI.f64)))) (.f64 (PI.f64) (.f64 b b))))
(.f64 angle (+.f64 (.f64 a (.f64 0 (.f64 b (PI.f64)))) (.f64 b (.f64 b (PI.f64)))))
(+.f64 (.f64 angle (.f64 a (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))))) (+.f64 (.f64 -1 (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))))
(fma.f64 angle (.f64 a (.f64 0 (.f64 b (PI.f64)))) (fma.f64 -1 (.f64 (.f64 angle (.f64 a a)) (PI.f64)) (.f64 angle (.f64 (PI.f64) (*.f64 b b)))))
(fma.f64 angle (.f64 a (.f64 0 (.f64 b (PI.f64)))) (fma.f64 -1 (.f64 angle (.f64 (.f64 a a) (PI.f64))) (.f64 angle (.f64 b (*.f64 b (PI.f64))))))
(+.f64 (.f64 angle (.f64 a (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))))) (+.f64 (.f64 -1 (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))))
(fma.f64 angle (.f64 a (.f64 0 (.f64 b (PI.f64)))) (fma.f64 -1 (.f64 (.f64 angle (.f64 a a)) (PI.f64)) (.f64 angle (.f64 (PI.f64) (*.f64 b b)))))
(fma.f64 angle (.f64 a (.f64 0 (.f64 b (PI.f64)))) (fma.f64 -1 (.f64 angle (.f64 (.f64 a a) (PI.f64))) (.f64 angle (.f64 b (*.f64 b (PI.f64))))))
(.f64 -1 (.f64 angle (*.f64 (pow.f64 a 2) (PI.f64))))
(neg.f64 (.f64 (.f64 angle (*.f64 a a)) (PI.f64)))
(neg.f64 (.f64 angle (.f64 (*.f64 a a) (PI.f64))))
(+.f64 (.f64 angle (.f64 a (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))))) (.f64 -1 (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))))
(fma.f64 angle (.f64 a (.f64 0 (.f64 b (PI.f64)))) (neg.f64 (.f64 (.f64 angle (.f64 a a)) (PI.f64))))
(fma.f64 angle (.f64 a (.f64 0 (.f64 b (PI.f64)))) (neg.f64 (.f64 angle (.f64 (.f64 a a) (PI.f64)))))
(+.f64 (.f64 angle (.f64 a (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))))) (+.f64 (.f64 -1 (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))))
(fma.f64 angle (.f64 a (.f64 0 (.f64 b (PI.f64)))) (fma.f64 -1 (.f64 (.f64 angle (.f64 a a)) (PI.f64)) (.f64 angle (.f64 (PI.f64) (*.f64 b b)))))
(fma.f64 angle (.f64 a (.f64 0 (.f64 b (PI.f64)))) (fma.f64 -1 (.f64 angle (.f64 (.f64 a a) (PI.f64))) (.f64 angle (.f64 b (*.f64 b (PI.f64))))))
(+.f64 (.f64 angle (.f64 a (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))))) (+.f64 (.f64 -1 (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))))
(fma.f64 angle (.f64 a (.f64 0 (.f64 b (PI.f64)))) (fma.f64 -1 (.f64 (.f64 angle (.f64 a a)) (PI.f64)) (.f64 angle (.f64 (PI.f64) (*.f64 b b)))))
(fma.f64 angle (.f64 a (.f64 0 (.f64 b (PI.f64)))) (fma.f64 -1 (.f64 angle (.f64 (.f64 a a) (PI.f64))) (.f64 angle (.f64 b (*.f64 b (PI.f64))))))
(.f64 -1 (.f64 angle (*.f64 (pow.f64 a 2) (PI.f64))))
(neg.f64 (.f64 (.f64 angle (*.f64 a a)) (PI.f64)))
(neg.f64 (.f64 angle (.f64 (*.f64 a a) (PI.f64))))
(+.f64 (.f64 -1 (.f64 angle (.f64 a (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))))) (.f64 -1 (.f64 angle (*.f64 (pow.f64 a 2) (PI.f64)))))
(fma.f64 -1 (.f64 (.f64 angle a) (.f64 0 (.f64 b (PI.f64)))) (neg.f64 (.f64 (.f64 angle (*.f64 a a)) (PI.f64))))
(fma.f64 -1 (.f64 (.f64 (.f64 angle a) 0) (.f64 b (PI.f64))) (neg.f64 (.f64 angle (.f64 (*.f64 a a) (PI.f64)))))
(+.f64 (.f64 -1 (.f64 angle (.f64 a (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))))) (+.f64 (.f64 -1 (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (.f64 angle (*.f64 (pow.f64 b 2) (PI.f64)))))
(fma.f64 -1 (.f64 (.f64 angle a) (.f64 0 (.f64 b (PI.f64)))) (fma.f64 -1 (.f64 (.f64 angle (.f64 a a)) (PI.f64)) (.f64 angle (.f64 (PI.f64) (.f64 b b)))))
(fma.f64 -1 (.f64 (.f64 (.f64 angle a) 0) (.f64 b (PI.f64))) (fma.f64 -1 (.f64 angle (.f64 (.f64 a a) (PI.f64))) (.f64 angle (.f64 b (.f64 b (PI.f64))))))
(+.f64 (.f64 -1 (.f64 angle (.f64 a (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))))) (+.f64 (.f64 -1 (.f64 angle (.f64 (pow.f64 a 2) (PI.f64)))) (.f64 angle (*.f64 (pow.f64 b 2) (PI.f64)))))
(fma.f64 -1 (.f64 (.f64 angle a) (.f64 0 (.f64 b (PI.f64)))) (fma.f64 -1 (.f64 (.f64 angle (.f64 a a)) (PI.f64)) (.f64 angle (.f64 (PI.f64) (.f64 b b)))))
(fma.f64 -1 (.f64 (.f64 (.f64 angle a) 0) (.f64 b (PI.f64))) (fma.f64 -1 (.f64 angle (.f64 (.f64 a a) (PI.f64))) (.f64 angle (.f64 b (.f64 b (PI.f64))))))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (*.f64 x-scale x-scale))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (*.f64 x-scale x-scale))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (*.f64 x-scale x-scale))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (*.f64 x-scale x-scale))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (*.f64 x-scale x-scale))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (*.f64 x-scale x-scale))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (*.f64 x-scale x-scale))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (*.f64 x-scale x-scale))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (*.f64 x-scale x-scale))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (*.f64 x-scale x-scale))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (*.f64 x-scale x-scale))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (*.f64 x-scale x-scale))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (*.f64 x-scale x-scale))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (*.f64 x-scale x-scale))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (*.f64 x-scale x-scale))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (*.f64 x-scale x-scale))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (*.f64 x-scale x-scale))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (*.f64 x-scale x-scale))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (*.f64 x-scale x-scale))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (*.f64 x-scale x-scale))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (*.f64 x-scale x-scale))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (*.f64 x-scale x-scale))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (*.f64 x-scale x-scale))
(/.f64 b (pow.f64 x-scale 2))
(/.f64 b (*.f64 x-scale x-scale))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b)))))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b)))))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b)))))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b)))))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (+.f64 a b) (PI.f64)))))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(.f64 -1 (/.f64 y-scale (.f64 angle (*.f64 (pow.f64 a 2) (PI.f64)))))
(/.f64 (neg.f64 y-scale) (.f64 (.f64 angle (*.f64 a a)) (PI.f64)))
(/.f64 (neg.f64 y-scale) (.f64 angle (.f64 (*.f64 a a) (PI.f64))))
(+.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) b)) (.f64 angle (.f64 (pow.f64 a 4) (pow.f64 (PI.f64) 2))))) (.f64 -1 (/.f64 y-scale (.f64 angle (*.f64 (pow.f64 a 2) (PI.f64))))))
(fma.f64 -1 (/.f64 (.f64 y-scale (.f64 b (.f64 0 (.f64 a (PI.f64))))) (.f64 angle (.f64 (pow.f64 (PI.f64) 2) (pow.f64 a 4)))) (/.f64 (neg.f64 y-scale) (.f64 (.f64 angle (*.f64 a a)) (PI.f64))))
(fma.f64 -1 (/.f64 (/.f64 (/.f64 (.f64 0 (.f64 a (.f64 (PI.f64) y-scale))) (/.f64 angle b)) (pow.f64 a 4)) (pow.f64 (PI.f64) 2)) (/.f64 (neg.f64 y-scale) (.f64 angle (.f64 (.f64 a a) (PI.f64)))))
(+.f64 (.f64 -1 (.f64 (+.f64 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) 2)) (.f64 angle (.f64 (pow.f64 a 6) (pow.f64 (PI.f64) 3)))) (/.f64 y-scale (.f64 angle (.f64 (pow.f64 a 4) (PI.f64))))) (pow.f64 b 2))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) b)) (.f64 angle (.f64 (pow.f64 a 4) (pow.f64 (PI.f64) 2))))) (.f64 -1 (/.f64 y-scale (.f64 angle (*.f64 (pow.f64 a 2) (PI.f64)))))))
(fma.f64 -1 (.f64 (.f64 b b) (+.f64 (.f64 (/.f64 y-scale angle) (/.f64 (pow.f64 (.f64 0 (.f64 a (PI.f64))) 2) (.f64 (pow.f64 (PI.f64) 3) (pow.f64 a 6)))) (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (pow.f64 a 4)))))) (fma.f64 -1 (/.f64 (.f64 y-scale (.f64 b (.f64 0 (.f64 a (PI.f64))))) (.f64 angle (.f64 (pow.f64 (PI.f64) 2) (pow.f64 a 4)))) (/.f64 (neg.f64 y-scale) (.f64 (.f64 angle (*.f64 a a)) (PI.f64)))))
(fma.f64 -1 (.f64 (.f64 b b) (+.f64 (.f64 (/.f64 y-scale angle) (/.f64 (pow.f64 (.f64 (.f64 0 a) (PI.f64)) 2) (.f64 (pow.f64 (PI.f64) 3) (pow.f64 a 6)))) (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (pow.f64 a 4)))))) (fma.f64 -1 (/.f64 (/.f64 (/.f64 (.f64 0 (.f64 a (.f64 (PI.f64) y-scale))) (/.f64 angle b)) (pow.f64 a 4)) (pow.f64 (PI.f64) 2)) (/.f64 (neg.f64 y-scale) (.f64 angle (.f64 (.f64 a a) (PI.f64))))))
(+.f64 (.f64 -1 (.f64 (+.f64 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) 2)) (.f64 angle (.f64 (pow.f64 a 6) (pow.f64 (PI.f64) 3)))) (/.f64 y-scale (.f64 angle (.f64 (pow.f64 a 4) (PI.f64))))) (pow.f64 b 2))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) b)) (.f64 angle (.f64 (pow.f64 a 4) (pow.f64 (PI.f64) 2))))) (+.f64 (.f64 -1 (.f64 (+.f64 (/.f64 (.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) (+.f64 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) 2)) (.f64 angle (.f64 (pow.f64 a 6) (pow.f64 (PI.f64) 3)))) (/.f64 y-scale (.f64 angle (.f64 (pow.f64 a 4) (PI.f64)))))) (.f64 (pow.f64 a 2) (PI.f64))) (/.f64 (.f64 y-scale (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64))))) (.f64 angle (.f64 (pow.f64 a 6) (pow.f64 (PI.f64) 2))))) (pow.f64 b 3))) (.f64 -1 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64))))))))
(fma.f64 -1 (.f64 (.f64 b b) (+.f64 (.f64 (/.f64 y-scale angle) (/.f64 (pow.f64 (.f64 0 (.f64 a (PI.f64))) 2) (.f64 (pow.f64 (PI.f64) 3) (pow.f64 a 6)))) (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (pow.f64 a 4)))))) (fma.f64 -1 (/.f64 (.f64 y-scale (.f64 b (.f64 0 (.f64 a (PI.f64))))) (.f64 angle (.f64 (pow.f64 (PI.f64) 2) (pow.f64 a 4)))) (.f64 -1 (+.f64 (.f64 (pow.f64 b 3) (+.f64 (.f64 (/.f64 (.f64 0 (.f64 a (PI.f64))) (.f64 a a)) (/.f64 (+.f64 (.f64 (/.f64 y-scale angle) (/.f64 (pow.f64 (.f64 0 (.f64 a (PI.f64))) 2) (.f64 (pow.f64 (PI.f64) 3) (pow.f64 a 6)))) (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (pow.f64 a 4))))) (PI.f64))) (/.f64 y-scale (/.f64 (.f64 (.f64 angle (pow.f64 a 6)) (pow.f64 (PI.f64) 2)) (.f64 0 (.f64 a (PI.f64))))))) (/.f64 y-scale (.f64 (.f64 angle (*.f64 a a)) (PI.f64)))))))
(fma.f64 -1 (.f64 (.f64 b b) (+.f64 (.f64 (/.f64 y-scale angle) (/.f64 (pow.f64 (.f64 (.f64 0 a) (PI.f64)) 2) (.f64 (pow.f64 (PI.f64) 3) (pow.f64 a 6)))) (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (pow.f64 a 4)))))) (fma.f64 -1 (/.f64 (/.f64 (/.f64 (.f64 0 (.f64 a (.f64 (PI.f64) y-scale))) (/.f64 angle b)) (pow.f64 a 4)) (pow.f64 (PI.f64) 2)) (.f64 -1 (+.f64 (/.f64 (/.f64 y-scale angle) (.f64 (.f64 a a) (PI.f64))) (.f64 (pow.f64 b 3) (+.f64 (.f64 (/.f64 (.f64 (.f64 0 a) (PI.f64)) (.f64 a a)) (/.f64 (+.f64 (.f64 (/.f64 y-scale angle) (/.f64 (pow.f64 (.f64 (.f64 0 a) (PI.f64)) 2) (.f64 (pow.f64 (PI.f64) 3) (pow.f64 a 6)))) (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (pow.f64 a 4))))) (PI.f64))) (/.f64 y-scale (/.f64 (.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 a 6) angle)) (.f64 (*.f64 0 a) (PI.f64))))))))))
(/.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64))))
(/.f64 y-scale (.f64 angle (.f64 (PI.f64) (*.f64 b b))))
(/.f64 y-scale (.f64 angle (.f64 b (*.f64 b (PI.f64)))))
(+.f64 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) (.f64 -1 (/.f64 (.f64 y-scale (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64))))) (.f64 angle (*.f64 (pow.f64 b 3) (pow.f64 (PI.f64) 2))))))
(+.f64 (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (.f64 b b)))) (neg.f64 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 0 (.f64 a (PI.f64))) (*.f64 (pow.f64 (PI.f64) 2) (pow.f64 b 3))))))
(+.f64 (/.f64 y-scale (.f64 angle (.f64 b (.f64 b (PI.f64))))) (/.f64 (neg.f64 y-scale) (/.f64 angle (/.f64 (.f64 (.f64 0 a) (PI.f64)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 b 3))))))
(+.f64 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64))))) (.f64 angle (.f64 (pow.f64 b 3) (pow.f64 (PI.f64) 2))))) (.f64 -1 (/.f64 (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 angle (PI.f64)))) (.f64 -1 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) 2)) (*.f64 angle (pow.f64 (PI.f64) 3))))) (pow.f64 b 4)))))
(+.f64 (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (.f64 b b)))) (.f64 -1 (+.f64 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 0 (.f64 a (PI.f64))) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 b 3)))) (/.f64 (.f64 -1 (+.f64 (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (PI.f64))) (.f64 (/.f64 y-scale angle) (/.f64 (pow.f64 (.f64 0 (*.f64 a (PI.f64))) 2) (pow.f64 (PI.f64) 3))))) (pow.f64 b 4)))))
(+.f64 (/.f64 y-scale (.f64 angle (.f64 b (.f64 b (PI.f64))))) (fma.f64 -1 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 (.f64 0 a) (PI.f64)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 b 3)))) (/.f64 (.f64 1 (+.f64 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 a a) (PI.f64))) (.f64 (/.f64 y-scale angle) (/.f64 (pow.f64 (.f64 (*.f64 0 a) (PI.f64)) 2) (pow.f64 (PI.f64) 3))))) (pow.f64 b 4))))
(+.f64 (.f64 -1 (/.f64 (+.f64 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))))) (.f64 angle (pow.f64 (PI.f64) 2))) (.f64 -1 (/.f64 (.f64 (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 angle (PI.f64)))) (.f64 -1 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) 2)) (.f64 angle (pow.f64 (PI.f64) 3))))) (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64))))) (PI.f64)))) (pow.f64 b 5))) (+.f64 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64))))) (.f64 angle (.f64 (pow.f64 b 3) (pow.f64 (PI.f64) 2))))) (.f64 -1 (/.f64 (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 angle (PI.f64)))) (.f64 -1 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) 2)) (.f64 angle (pow.f64 (PI.f64) 3))))) (pow.f64 b 4))))))
(fma.f64 -1 (/.f64 (+.f64 (/.f64 y-scale (/.f64 (.f64 angle (pow.f64 (PI.f64) 2)) (.f64 (.f64 a a) (.f64 0 (.f64 a (PI.f64)))))) (neg.f64 (/.f64 (.f64 -1 (+.f64 (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (PI.f64))) (.f64 (/.f64 y-scale angle) (/.f64 (pow.f64 (.f64 0 (.f64 a (PI.f64))) 2) (pow.f64 (PI.f64) 3))))) (/.f64 (PI.f64) (.f64 0 (.f64 a (PI.f64))))))) (pow.f64 b 5)) (+.f64 (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (.f64 b b)))) (.f64 -1 (+.f64 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 0 (.f64 a (PI.f64))) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 b 3)))) (/.f64 (.f64 -1 (+.f64 (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (PI.f64))) (.f64 (/.f64 y-scale angle) (/.f64 (pow.f64 (.f64 0 (*.f64 a (PI.f64))) 2) (pow.f64 (PI.f64) 3))))) (pow.f64 b 4))))))
(fma.f64 -1 (/.f64 (+.f64 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 0 (.f64 (PI.f64) (pow.f64 a 3))) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 1 (+.f64 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 a a) (PI.f64))) (.f64 (/.f64 y-scale angle) (/.f64 (pow.f64 (.f64 (.f64 0 a) (PI.f64)) 2) (pow.f64 (PI.f64) 3))))) (/.f64 (PI.f64) (.f64 (.f64 0 a) (PI.f64))))) (pow.f64 b 5)) (+.f64 (/.f64 y-scale (.f64 angle (.f64 b (.f64 b (PI.f64))))) (fma.f64 -1 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 (.f64 0 a) (PI.f64)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 b 3)))) (/.f64 (.f64 1 (+.f64 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 a a) (PI.f64))) (.f64 (/.f64 y-scale angle) (/.f64 (pow.f64 (.f64 (.f64 0 a) (PI.f64)) 2) (pow.f64 (PI.f64) 3))))) (pow.f64 b 4)))))
(/.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64))))
(/.f64 y-scale (.f64 angle (.f64 (PI.f64) (*.f64 b b))))
(/.f64 y-scale (.f64 angle (.f64 b (*.f64 b (PI.f64)))))
(+.f64 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) (.f64 -1 (/.f64 (.f64 y-scale (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64))))) (.f64 angle (*.f64 (pow.f64 b 3) (pow.f64 (PI.f64) 2))))))
(+.f64 (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (.f64 b b)))) (neg.f64 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 0 (.f64 a (PI.f64))) (*.f64 (pow.f64 (PI.f64) 2) (pow.f64 b 3))))))
(+.f64 (/.f64 y-scale (.f64 angle (.f64 b (.f64 b (PI.f64))))) (/.f64 (neg.f64 y-scale) (/.f64 angle (/.f64 (.f64 (.f64 0 a) (PI.f64)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 b 3))))))
(+.f64 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) 2)) (.f64 angle (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 3)))) (+.f64 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64))))) (.f64 angle (.f64 (pow.f64 b 3) (pow.f64 (PI.f64) 2))))) (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 angle (.f64 (pow.f64 b 4) (PI.f64)))))))
(+.f64 (.f64 (/.f64 y-scale angle) (/.f64 (pow.f64 (.f64 0 (.f64 a (PI.f64))) 2) (.f64 (pow.f64 (PI.f64) 3) (pow.f64 b 4)))) (+.f64 (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (.f64 b b)))) (fma.f64 -1 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 0 (.f64 a (PI.f64))) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 b 3)))) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (*.f64 (PI.f64) (pow.f64 b 4)))))))
(+.f64 (/.f64 y-scale (.f64 angle (.f64 b (.f64 b (PI.f64))))) (+.f64 (fma.f64 -1 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 (.f64 0 a) (PI.f64)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 b 3)))) (.f64 (/.f64 y-scale angle) (/.f64 (/.f64 (.f64 a a) (PI.f64)) (pow.f64 b 4)))) (/.f64 (pow.f64 (.f64 (.f64 0 a) (PI.f64)) 2) (/.f64 (.f64 angle (*.f64 (pow.f64 (PI.f64) 3) (pow.f64 b 4))) y-scale))))
(+.f64 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) 2)) (.f64 angle (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 3)))) (+.f64 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64))))) (.f64 angle (.f64 (pow.f64 b 3) (pow.f64 (PI.f64) 2))))) (+.f64 (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 angle (.f64 (pow.f64 b 4) (PI.f64)))) (.f64 -1 (/.f64 (+.f64 (/.f64 (.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) (+.f64 (/.f64 (.f64 y-scale (pow.f64 a 2)) (.f64 angle (PI.f64))) (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))) 2)) (.f64 angle (pow.f64 (PI.f64) 3))))) (PI.f64)) (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (+.f64 (.f64 a (PI.f64)) (.f64 -1 (.f64 a (PI.f64)))))) (.f64 angle (pow.f64 (PI.f64) 2)))) (pow.f64 b 5)))))))
(+.f64 (.f64 (/.f64 y-scale angle) (/.f64 (pow.f64 (.f64 0 (.f64 a (PI.f64))) 2) (.f64 (pow.f64 (PI.f64) 3) (pow.f64 b 4)))) (+.f64 (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (.f64 b b)))) (+.f64 (fma.f64 -1 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 0 (.f64 a (PI.f64))) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 b 3)))) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 (PI.f64) (pow.f64 b 4))))) (neg.f64 (/.f64 (+.f64 (/.f64 y-scale (/.f64 (.f64 angle (pow.f64 (PI.f64) 2)) (.f64 (.f64 a a) (.f64 0 (.f64 a (PI.f64)))))) (/.f64 (.f64 0 (.f64 a (PI.f64))) (/.f64 (PI.f64) (+.f64 (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (PI.f64))) (.f64 (/.f64 y-scale angle) (/.f64 (pow.f64 (.f64 0 (.f64 a (PI.f64))) 2) (pow.f64 (PI.f64) 3))))))) (pow.f64 b 5))))))
(+.f64 (+.f64 (/.f64 y-scale (.f64 angle (.f64 b (.f64 b (PI.f64))))) (+.f64 (fma.f64 -1 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 (.f64 0 a) (PI.f64)) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 b 3)))) (.f64 (/.f64 y-scale angle) (/.f64 (/.f64 (.f64 a a) (PI.f64)) (pow.f64 b 4)))) (/.f64 (pow.f64 (.f64 (.f64 0 a) (PI.f64)) 2) (/.f64 (.f64 angle (.f64 (pow.f64 (PI.f64) 3) (pow.f64 b 4))) y-scale)))) (neg.f64 (/.f64 (+.f64 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 0 (.f64 (PI.f64) (pow.f64 a 3))) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 (.f64 0 a) (PI.f64)) (/.f64 (PI.f64) (+.f64 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 a a) (PI.f64))) (.f64 (/.f64 y-scale angle) (/.f64 (pow.f64 (.f64 (*.f64 0 a) (PI.f64)) 2) (pow.f64 (PI.f64) 3))))))) (pow.f64 b 5))))
(/.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64))))
(/.f64 y-scale (.f64 angle (.f64 (PI.f64) (*.f64 b b))))
(/.f64 y-scale (.f64 angle (.f64 b (*.f64 b (PI.f64)))))
(+.f64 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) (.f64 -1 (/.f64 (.f64 y-scale (.f64 a (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))))) (.f64 angle (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2))))))
(+.f64 (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (.f64 b b)))) (neg.f64 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 a (.f64 0 (.f64 b (PI.f64)))) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 b 4))))))
(+.f64 (/.f64 y-scale (.f64 angle (.f64 b (.f64 b (PI.f64))))) (neg.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 y-scale a) 0) (.f64 b (PI.f64))) (.f64 angle (pow.f64 b 4))) (pow.f64 (PI.f64) 2))))
(+.f64 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 a (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))))) (.f64 angle (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2))))) (.f64 -1 (.f64 (pow.f64 a 2) (+.f64 (.f64 -1 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 b 4) (PI.f64))))) (.f64 -1 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 angle (.f64 (pow.f64 b 6) (pow.f64 (PI.f64) 3))))))))))
(+.f64 (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (.f64 b b)))) (fma.f64 -1 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 a (.f64 0 (.f64 b (PI.f64)))) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 b 4)))) (neg.f64 (.f64 (.f64 a a) (.f64 -1 (+.f64 (/.f64 (/.f64 y-scale angle) (.f64 (PI.f64) (pow.f64 b 4))) (.f64 (/.f64 y-scale angle) (/.f64 (pow.f64 (.f64 0 (.f64 b (PI.f64))) 2) (.f64 (pow.f64 (PI.f64) 3) (pow.f64 b 6))))))))))
(+.f64 (/.f64 y-scale (.f64 angle (.f64 b (.f64 b (PI.f64))))) (.f64 -1 (+.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 y-scale a) 0) (.f64 b (PI.f64))) (.f64 angle (pow.f64 b 4))) (pow.f64 (PI.f64) 2)) (.f64 (.f64 a a) (.f64 -1 (+.f64 (/.f64 (/.f64 y-scale angle) (.f64 (PI.f64) (pow.f64 b 4))) (/.f64 y-scale (/.f64 (.f64 (pow.f64 (PI.f64) 3) (.f64 (pow.f64 b 6) angle)) (pow.f64 (.f64 0 (*.f64 b (PI.f64))) 2)))))))))
(+.f64 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 b 2) (PI.f64)))) (+.f64 (.f64 -1 (.f64 (+.f64 (.f64 -1 (/.f64 (.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) (+.f64 (.f64 -1 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 b 4) (PI.f64))))) (.f64 -1 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 angle (.f64 (pow.f64 b 6) (pow.f64 (PI.f64) 3))))))) (.f64 (pow.f64 b 2) (PI.f64)))) (/.f64 (.f64 y-scale (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (.f64 angle (.f64 (pow.f64 b 6) (pow.f64 (PI.f64) 2))))) (pow.f64 a 3))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (.f64 a (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))))) (.f64 angle (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2))))) (.f64 -1 (.f64 (pow.f64 a 2) (+.f64 (.f64 -1 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 b 4) (PI.f64))))) (.f64 -1 (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 angle (.f64 (pow.f64 b 6) (pow.f64 (PI.f64) 3)))))))))))
(+.f64 (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (.f64 b b)))) (fma.f64 -1 (.f64 (pow.f64 a 3) (fma.f64 -1 (.f64 (/.f64 (.f64 0 (.f64 b (PI.f64))) (.f64 b b)) (/.f64 (.f64 -1 (+.f64 (/.f64 (/.f64 y-scale angle) (.f64 (PI.f64) (pow.f64 b 4))) (.f64 (/.f64 y-scale angle) (/.f64 (pow.f64 (.f64 0 (.f64 b (PI.f64))) 2) (.f64 (pow.f64 (PI.f64) 3) (pow.f64 b 6)))))) (PI.f64))) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (pow.f64 (PI.f64) 2) (pow.f64 b 6))) (.f64 0 (.f64 b (PI.f64))))))) (fma.f64 -1 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 a (.f64 0 (.f64 b (PI.f64)))) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 b 4)))) (neg.f64 (.f64 (.f64 a a) (.f64 -1 (+.f64 (/.f64 (/.f64 y-scale angle) (.f64 (PI.f64) (pow.f64 b 4))) (.f64 (/.f64 y-scale angle) (/.f64 (pow.f64 (.f64 0 (.f64 b (PI.f64))) 2) (*.f64 (pow.f64 (PI.f64) 3) (pow.f64 b 6)))))))))))
(+.f64 (/.f64 y-scale (.f64 angle (.f64 b (.f64 b (PI.f64))))) (fma.f64 -1 (.f64 (pow.f64 a 3) (fma.f64 -1 (.f64 (/.f64 (.f64 0 (.f64 b (PI.f64))) (.f64 b b)) (/.f64 -1 (/.f64 (PI.f64) (+.f64 (/.f64 (/.f64 y-scale angle) (.f64 (PI.f64) (pow.f64 b 4))) (/.f64 y-scale (/.f64 (.f64 (pow.f64 (PI.f64) 3) (.f64 (pow.f64 b 6) angle)) (pow.f64 (.f64 0 (.f64 b (PI.f64))) 2))))))) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 0 (.f64 b (PI.f64))) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 b 6)))))) (.f64 -1 (+.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 y-scale a) 0) (.f64 b (PI.f64))) (.f64 angle (pow.f64 b 4))) (pow.f64 (PI.f64) 2)) (.f64 (.f64 a a) (.f64 -1 (+.f64 (/.f64 (/.f64 y-scale angle) (.f64 (PI.f64) (pow.f64 b 4))) (/.f64 y-scale (/.f64 (.f64 (pow.f64 (PI.f64) 3) (.f64 (pow.f64 b 6) angle)) (pow.f64 (.f64 0 (*.f64 b (PI.f64))) 2))))))))))
(.f64 -1 (/.f64 y-scale (.f64 angle (*.f64 (pow.f64 a 2) (PI.f64)))))
(/.f64 (neg.f64 y-scale) (.f64 (.f64 angle (*.f64 a a)) (PI.f64)))
(/.f64 (neg.f64 y-scale) (.f64 angle (.f64 (*.f64 a a) (PI.f64))))
(+.f64 (.f64 -1 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64))))) (.f64 -1 (/.f64 (.f64 y-scale (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (.f64 angle (.f64 (pow.f64 a 3) (pow.f64 (PI.f64) 2))))))
(.f64 -1 (+.f64 (/.f64 y-scale (.f64 (.f64 angle (.f64 a a)) (PI.f64))) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 0 (.f64 b (PI.f64))) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 a 3))))))
(.f64 -1 (+.f64 (/.f64 (/.f64 y-scale angle) (.f64 (.f64 a a) (PI.f64))) (/.f64 y-scale (/.f64 (.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 a 3) angle)) (.f64 0 (*.f64 b (PI.f64)))))))
(+.f64 (.f64 -1 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64))))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (.f64 angle (.f64 (pow.f64 a 3) (pow.f64 (PI.f64) 2))))) (.f64 -1 (/.f64 (+.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 angle (PI.f64))) (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 angle (pow.f64 (PI.f64) 3)))) (pow.f64 a 4)))))
(fma.f64 -1 (/.f64 y-scale (.f64 (.f64 angle (.f64 a a)) (PI.f64))) (.f64 -1 (+.f64 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 0 (.f64 b (PI.f64))) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 a 3)))) (/.f64 (+.f64 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 b b) (PI.f64))) (/.f64 y-scale (/.f64 (.f64 angle (pow.f64 (PI.f64) 3)) (pow.f64 (.f64 0 (*.f64 b (PI.f64))) 2)))) (pow.f64 a 4)))))
(fma.f64 -1 (/.f64 (/.f64 y-scale angle) (.f64 (.f64 a a) (PI.f64))) (.f64 -1 (+.f64 (/.f64 y-scale (/.f64 (.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 a 3) angle)) (.f64 0 (.f64 b (PI.f64))))) (/.f64 (+.f64 (.f64 (/.f64 y-scale angle) (/.f64 b (/.f64 (PI.f64) b))) (/.f64 (pow.f64 (.f64 0 (.f64 b (PI.f64))) 2) (/.f64 (*.f64 angle (pow.f64 (PI.f64) 3)) y-scale))) (pow.f64 a 4)))))
(+.f64 (.f64 -1 (/.f64 (+.f64 (/.f64 (.f64 y-scale (.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) (pow.f64 b 2))) (.f64 angle (pow.f64 (PI.f64) 2))) (/.f64 (.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) (+.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 angle (PI.f64))) (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 angle (pow.f64 (PI.f64) 3))))) (PI.f64))) (pow.f64 a 5))) (+.f64 (.f64 -1 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64))))) (+.f64 (.f64 -1 (/.f64 (.f64 y-scale (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (.f64 angle (.f64 (pow.f64 a 3) (pow.f64 (PI.f64) 2))))) (.f64 -1 (/.f64 (+.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 angle (PI.f64))) (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 angle (pow.f64 (PI.f64) 3)))) (pow.f64 a 4))))))
(fma.f64 -1 (/.f64 (+.f64 (/.f64 (.f64 y-scale (.f64 (.f64 b b) (.f64 0 (.f64 b (PI.f64))))) (.f64 angle (pow.f64 (PI.f64) 2))) (/.f64 (.f64 (.f64 0 (.f64 b (PI.f64))) (+.f64 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 b b) (PI.f64))) (/.f64 y-scale (/.f64 (.f64 angle (pow.f64 (PI.f64) 3)) (pow.f64 (.f64 0 (.f64 b (PI.f64))) 2))))) (PI.f64))) (pow.f64 a 5)) (fma.f64 -1 (/.f64 y-scale (.f64 (.f64 angle (.f64 a a)) (PI.f64))) (.f64 -1 (+.f64 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 0 (.f64 b (PI.f64))) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 a 3)))) (/.f64 (+.f64 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 b b) (PI.f64))) (/.f64 y-scale (/.f64 (.f64 angle (pow.f64 (PI.f64) 3)) (pow.f64 (.f64 0 (*.f64 b (PI.f64))) 2)))) (pow.f64 a 4))))))
(fma.f64 -1 (/.f64 (+.f64 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 0 (.f64 b (PI.f64))) (/.f64 (pow.f64 (PI.f64) 2) (.f64 b b)))) (/.f64 (+.f64 (.f64 (/.f64 y-scale angle) (/.f64 b (/.f64 (PI.f64) b))) (/.f64 (pow.f64 (.f64 0 (.f64 b (PI.f64))) 2) (/.f64 (.f64 angle (pow.f64 (PI.f64) 3)) y-scale))) (/.f64 (/.f64 (PI.f64) 0) (.f64 b (PI.f64))))) (pow.f64 a 5)) (fma.f64 -1 (/.f64 (/.f64 y-scale angle) (.f64 (.f64 a a) (PI.f64))) (.f64 -1 (+.f64 (/.f64 y-scale (/.f64 (.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 a 3) angle)) (.f64 0 (.f64 b (PI.f64))))) (/.f64 (+.f64 (.f64 (/.f64 y-scale angle) (/.f64 b (/.f64 (PI.f64) b))) (/.f64 (pow.f64 (.f64 0 (.f64 b (PI.f64))) 2) (/.f64 (.f64 angle (pow.f64 (PI.f64) 3)) y-scale))) (pow.f64 a 4))))))
(.f64 -1 (/.f64 y-scale (.f64 angle (*.f64 (pow.f64 a 2) (PI.f64)))))
(/.f64 (neg.f64 y-scale) (.f64 (.f64 angle (*.f64 a a)) (PI.f64)))
(/.f64 (neg.f64 y-scale) (.f64 angle (.f64 (*.f64 a a) (PI.f64))))
(+.f64 (.f64 -1 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64))))) (/.f64 (.f64 y-scale (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (.f64 angle (*.f64 (pow.f64 a 3) (pow.f64 (PI.f64) 2)))))
(fma.f64 -1 (/.f64 y-scale (.f64 (.f64 angle (.f64 a a)) (PI.f64))) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 0 (.f64 b (PI.f64))) (*.f64 (pow.f64 (PI.f64) 2) (pow.f64 a 3)))))
(fma.f64 -1 (/.f64 (/.f64 y-scale angle) (.f64 (.f64 a a) (PI.f64))) (/.f64 y-scale (/.f64 (.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 a 3) angle)) (.f64 0 (.f64 b (PI.f64))))))
(+.f64 (.f64 -1 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64))))) (+.f64 (/.f64 (.f64 y-scale (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (.f64 angle (.f64 (pow.f64 a 3) (pow.f64 (PI.f64) 2)))) (.f64 -1 (/.f64 (+.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 angle (PI.f64))) (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (*.f64 angle (pow.f64 (PI.f64) 3)))) (pow.f64 a 4)))))
(+.f64 (fma.f64 -1 (/.f64 y-scale (.f64 (.f64 angle (.f64 a a)) (PI.f64))) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 0 (.f64 b (PI.f64))) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 a 3))))) (neg.f64 (/.f64 (+.f64 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 b b) (PI.f64))) (/.f64 y-scale (/.f64 (.f64 angle (pow.f64 (PI.f64) 3)) (pow.f64 (.f64 0 (.f64 b (PI.f64))) 2)))) (pow.f64 a 4))))
(+.f64 (neg.f64 (/.f64 (+.f64 (.f64 (/.f64 y-scale angle) (/.f64 b (/.f64 (PI.f64) b))) (/.f64 (pow.f64 (.f64 0 (.f64 b (PI.f64))) 2) (/.f64 (.f64 angle (pow.f64 (PI.f64) 3)) y-scale))) (pow.f64 a 4))) (fma.f64 -1 (/.f64 (/.f64 y-scale angle) (.f64 (.f64 a a) (PI.f64))) (/.f64 y-scale (/.f64 (.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 a 3) angle)) (.f64 0 (.f64 b (PI.f64)))))))
(+.f64 (/.f64 (.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) (+.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 angle (PI.f64))) (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 angle (pow.f64 (PI.f64) 3))))) (.f64 (pow.f64 a 5) (PI.f64))) (+.f64 (.f64 -1 (/.f64 y-scale (.f64 angle (.f64 (pow.f64 a 2) (PI.f64))))) (+.f64 (/.f64 (.f64 y-scale (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64))))) (.f64 angle (.f64 (pow.f64 a 3) (pow.f64 (PI.f64) 2)))) (+.f64 (/.f64 (.f64 y-scale (.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) (pow.f64 b 2))) (.f64 angle (.f64 (pow.f64 a 5) (pow.f64 (PI.f64) 2)))) (.f64 -1 (/.f64 (+.f64 (/.f64 (.f64 y-scale (pow.f64 b 2)) (.f64 angle (PI.f64))) (/.f64 (.f64 y-scale (pow.f64 (+.f64 (.f64 b (PI.f64)) (.f64 -1 (.f64 b (PI.f64)))) 2)) (.f64 angle (pow.f64 (PI.f64) 3)))) (pow.f64 a 4)))))))
(+.f64 (.f64 (/.f64 (.f64 0 (.f64 b (PI.f64))) (pow.f64 a 5)) (/.f64 (+.f64 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 b b) (PI.f64))) (/.f64 y-scale (/.f64 (.f64 angle (pow.f64 (PI.f64) 3)) (pow.f64 (.f64 0 (.f64 b (PI.f64))) 2)))) (PI.f64))) (+.f64 (fma.f64 -1 (/.f64 y-scale (.f64 (.f64 angle (.f64 a a)) (PI.f64))) (.f64 (/.f64 y-scale angle) (/.f64 (.f64 0 (.f64 b (PI.f64))) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 a 3))))) (+.f64 (neg.f64 (/.f64 (+.f64 (.f64 (/.f64 y-scale angle) (/.f64 (.f64 b b) (PI.f64))) (/.f64 y-scale (/.f64 (.f64 angle (pow.f64 (PI.f64) 3)) (pow.f64 (.f64 0 (.f64 b (PI.f64))) 2)))) (pow.f64 a 4))) (/.f64 (.f64 y-scale (.f64 (.f64 b b) (.f64 0 (.f64 b (PI.f64))))) (.f64 angle (*.f64 (pow.f64 (PI.f64) 2) (pow.f64 a 5)))))))
(+.f64 (.f64 (/.f64 (.f64 0 (.f64 b (PI.f64))) (pow.f64 a 5)) (/.f64 (+.f64 (.f64 (/.f64 y-scale angle) (/.f64 b (/.f64 (PI.f64) b))) (/.f64 (pow.f64 (.f64 0 (.f64 b (PI.f64))) 2) (/.f64 (.f64 angle (pow.f64 (PI.f64) 3)) y-scale))) (PI.f64))) (+.f64 (+.f64 (fma.f64 -1 (/.f64 (/.f64 y-scale angle) (.f64 (.f64 a a) (PI.f64))) (/.f64 y-scale (/.f64 (.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 a 3) angle)) (.f64 0 (.f64 b (PI.f64)))))) (/.f64 y-scale (/.f64 (.f64 angle (.f64 (pow.f64 (PI.f64) 2) (pow.f64 a 5))) (.f64 (.f64 b b) (.f64 0 (.f64 b (PI.f64))))))) (neg.f64 (/.f64 (+.f64 (.f64 (/.f64 y-scale angle) (/.f64 b (/.f64 (PI.f64) b))) (/.f64 (pow.f64 (.f64 0 (.f64 b (PI.f64))) 2) (/.f64 (*.f64 angle (pow.f64 (PI.f64) 3)) y-scale))) (pow.f64 a 4)))))
(.f64 y-scale (.f64 (/.f64 1 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 (.f64 x-scale y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 y-scale (/.f64 1 (.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))))))))
(/.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))))
(.f64 (.f64 (/.f64 y-scale (.f64 (.f64 1/2 angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))))
(.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) 2)))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 (.f64 x-scale y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 x-scale (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) 2)))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 (.f64 x-scale y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2))) 1)
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 (.f64 x-scale y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 1 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 (.f64 x-scale y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (sqrt.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2)))) (sqrt.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) 2)))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 (.f64 x-scale y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (.f64 (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) 2))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 (.f64 x-scale y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (cbrt.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2)))) (cbrt.f64 (pow.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) 2))) 2)))
(.f64 (cbrt.f64 (.f64 x-scale (.f64 (.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) 2))) (cbrt.f64 (pow.f64 (.f64 x-scale (.f64 (.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))) 2)) 2)))
(.f64 (cbrt.f64 (.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))) (cbrt.f64 (pow.f64 (.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) 2)))
(.f64 (cbrt.f64 (pow.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2))) 2)) (cbrt.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) 2)))))
(.f64 (cbrt.f64 (.f64 x-scale (.f64 (.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) 2))) (cbrt.f64 (pow.f64 (.f64 x-scale (.f64 (.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))) 2)) 2)))
(.f64 (cbrt.f64 (.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))) (cbrt.f64 (pow.f64 (.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) 2)))
(.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) 2)) (.f64 (cbrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) 2))))
(.f64 (cbrt.f64 (pow.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) 2)) (.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) (cbrt.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b)))))))
(.f64 (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) (.f64 (cbrt.f64 (pow.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) 2)) (cbrt.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b)))))))
(.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) 2)) x-scale)
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 (.f64 x-scale y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2)) (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a))))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 (.f64 x-scale y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2) (/.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (/.f64 1 x-scale)))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 (.f64 x-scale y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (/.f64 (neg.f64 y-scale) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (/.f64 1 (/.f64 -1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))))
(.f64 (neg.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (.f64 -2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))
(.f64 (/.f64 (neg.f64 y-scale) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (.f64 (.f64 -2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))))
(.f64 (.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2)) 1) x-scale)
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 (.f64 x-scale y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2)) (sqrt.f64 x-scale)) (sqrt.f64 x-scale))
(.f64 (.f64 (.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) 2) (*.f64 (sqrt.f64 x-scale) (sqrt.f64 x-scale)))
(.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) (.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) (*.f64 (sqrt.f64 x-scale) (sqrt.f64 x-scale))))
(.f64 (.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2)) (cbrt.f64 (*.f64 x-scale x-scale))) (cbrt.f64 x-scale))
(.f64 (.f64 (.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) 2) (.f64 (cbrt.f64 (.f64 x-scale x-scale)) (cbrt.f64 x-scale)))
(/.f64 (.f64 (.f64 (.f64 y-scale 2) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) (.f64 (cbrt.f64 (.f64 x-scale x-scale)) (cbrt.f64 x-scale))) (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b)))))
(.f64 (/.f64 1 (sqrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))) (/.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (sqrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))))
(.f64 (/.f64 1 (sqrt.f64 (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))) (/.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) (sqrt.f64 (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))))))
(/.f64 (/.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) (sqrt.f64 (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))
(.f64 (/.f64 1 (cbrt.f64 (pow.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) 2))) (/.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (cbrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))))
(.f64 (/.f64 1 (cbrt.f64 (pow.f64 (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) 2))) (/.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) (cbrt.f64 (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))))))
(/.f64 (/.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) (cbrt.f64 (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))) (cbrt.f64 (pow.f64 (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) 2)))
(.f64 (/.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) 1) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) 2)))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 (.f64 x-scale y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (/.f64 y-scale 1) (/.f64 (/.f64 1 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))))
(/.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))))
(.f64 (.f64 (/.f64 y-scale (.f64 (.f64 1/2 angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))))
(.f64 (/.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) 1/2) (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(/.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))))
(.f64 (.f64 (/.f64 y-scale (.f64 (.f64 1/2 angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))))
(.f64 (/.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (/.f64 -1/2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (neg.f64 x-scale))
(.f64 (.f64 (/.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) -1/2) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (neg.f64 x-scale))
(.f64 (/.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) (/.f64 -1/2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) (neg.f64 x-scale))
(.f64 (pow.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2))) 1/2) (pow.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) 2))) 1/2))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 (.f64 x-scale y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (/.f64 (sqrt.f64 y-scale) (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))) (/.f64 (sqrt.f64 y-scale) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))))
(.f64 (/.f64 (sqrt.f64 y-scale) (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) (/.f64 (sqrt.f64 y-scale) (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 (.f64 (.f64 (/.f64 (sqrt.f64 y-scale) 1/2) x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) (/.f64 (sqrt.f64 y-scale) (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))) (/.f64 (cbrt.f64 y-scale) (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a))))))
(/.f64 (.f64 (cbrt.f64 (.f64 y-scale y-scale)) (/.f64 (cbrt.f64 y-scale) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))) (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (.f64 (.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) 1/2) x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) (/.f64 (cbrt.f64 y-scale) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))
(.f64 (/.f64 y-scale (/.f64 1/2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) (/.f64 (/.f64 1 (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a))))) (/.f64 1 x-scale)))
(.f64 (.f64 (/.f64 y-scale 1/2) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) (/.f64 1 (.f64 (/.f64 1 x-scale) (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b)))))))
(.f64 (/.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) (/.f64 1/2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) x-scale)
(.f64 (/.f64 y-scale (sqrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))) (/.f64 (/.f64 1 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (sqrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))))
(.f64 (/.f64 1 (sqrt.f64 (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))) (/.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) (sqrt.f64 (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))))))
(/.f64 (/.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) (sqrt.f64 (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))
(.f64 (/.f64 y-scale (cbrt.f64 (pow.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) 2))) (/.f64 (/.f64 1 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (cbrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))))
(.f64 (/.f64 1 (cbrt.f64 (pow.f64 (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) 2))) (/.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) (cbrt.f64 (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))))))
(/.f64 (/.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) (cbrt.f64 (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))) (cbrt.f64 (pow.f64 (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) 2)))
(.f64 (/.f64 (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (/.f64 1/2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) (/.f64 (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (/.f64 1 x-scale)))
(.f64 (.f64 (/.f64 y-scale 1/2) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) (/.f64 1 (.f64 (/.f64 1 x-scale) (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b)))))))
(.f64 (/.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) (/.f64 1/2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) x-scale)
(.f64 (/.f64 (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) 1) (/.f64 (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))))))
(/.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))))
(.f64 (.f64 (/.f64 y-scale (.f64 (.f64 1/2 angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))))
(.f64 (/.f64 (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (sqrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))) (/.f64 (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (sqrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))))))))
(.f64 (/.f64 1 (sqrt.f64 (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))) (/.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) (sqrt.f64 (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))))))
(/.f64 (/.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) (sqrt.f64 (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))
(.f64 (/.f64 (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (cbrt.f64 (pow.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) 2))) (/.f64 (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (cbrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))))))))
(.f64 (/.f64 1 (cbrt.f64 (pow.f64 (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) 2))) (/.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) (cbrt.f64 (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))))))
(/.f64 (/.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) (cbrt.f64 (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))) (cbrt.f64 (pow.f64 (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) 2)))
(.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) 2)) (/.f64 1/2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) (/.f64 (cbrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (/.f64 1 x-scale)))
(/.f64 (.f64 (cbrt.f64 (pow.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) 2)) (/.f64 (cbrt.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (/.f64 1 x-scale))) (/.f64 1/2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) 2)) 1/2) (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (.f64 (/.f64 (cbrt.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) 1) x-scale)))
(.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) 2)) 1) (/.f64 (cbrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))))))
(/.f64 (.f64 (cbrt.f64 (pow.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) 2)) (cbrt.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))) (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(.f64 (cbrt.f64 (pow.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) 2)) (/.f64 (cbrt.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))
(.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) 2)) (sqrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))) (/.f64 (cbrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (sqrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))))))))
(.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) 2)) (sqrt.f64 (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))) (/.f64 (cbrt.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (sqrt.f64 (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))))))
(/.f64 (cbrt.f64 (pow.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) 2)) (/.f64 (sqrt.f64 (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) (/.f64 (cbrt.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (sqrt.f64 (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))))
(.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) 2)) (cbrt.f64 (pow.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) 2))) (/.f64 (cbrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (cbrt.f64 (/.f64 1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))))))))
(.f64 (/.f64 (cbrt.f64 (pow.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) 2)) (cbrt.f64 (pow.f64 (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) 2))) (/.f64 (cbrt.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (cbrt.f64 (/.f64 (/.f64 1/2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))))))
(pow.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) 2))) 1)
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 (.f64 x-scale y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(neg.f64 (/.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (/.f64 -1/2 (.f64 x-scale (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))))))
(.f64 (.f64 (/.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) -1/2) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (neg.f64 x-scale))
(.f64 (/.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) (/.f64 -1/2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) (neg.f64 x-scale))
(log.f64 (exp.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) 2)))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 (.f64 x-scale y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(cbrt.f64 (.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) 2))) (pow.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) 2))) 2)))
(cbrt.f64 (.f64 (.f64 x-scale (.f64 (.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))) 2)) (pow.f64 (.f64 x-scale (.f64 (.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))) 2)) 2)))
(cbrt.f64 (.f64 (.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))) (pow.f64 (.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) 2)))
(expm1.f64 (log1p.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) 2)))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 (.f64 x-scale y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(exp.f64 (log.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) 2)))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 (.f64 x-scale y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(log1p.f64 (expm1.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (.f64 x-scale (.f64 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (*.f64 x-scale x-scale)))) 2)))))
(.f64 2 (.f64 (/.f64 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) angle) (/.f64 (.f64 x-scale y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale))))))
(pow.f64 (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))) 1)
(.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))
(log.f64 (exp.f64 (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a))))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))
(cbrt.f64 (.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) (pow.f64 (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))) 2)))
(cbrt.f64 (.f64 angle (.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))) (pow.f64 (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b)))) 2))))
(cbrt.f64 (.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) (pow.f64 (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b)))) 2)))
(expm1.f64 (log1p.f64 (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a))))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))
(exp.f64 (log.f64 (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a))))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))
(log1p.f64 (expm1.f64 (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a))))))
(.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))
(.f64 b (/.f64 1 (.f64 x-scale x-scale)))
(/.f64 b (*.f64 x-scale x-scale))
(.f64 (/.f64 b (.f64 x-scale x-scale)) 1)
(/.f64 b (*.f64 x-scale x-scale))
(.f64 1 (/.f64 b (.f64 x-scale x-scale)))
(/.f64 b (*.f64 x-scale x-scale))
(.f64 (sqrt.f64 (/.f64 b (.f64 x-scale x-scale))) (sqrt.f64 (/.f64 b (*.f64 x-scale x-scale))))
(/.f64 b (*.f64 x-scale x-scale))
(.f64 (sqrt.f64 b) (.f64 (sqrt.f64 b) (/.f64 1 (*.f64 x-scale x-scale))))
(.f64 (sqrt.f64 b) (.f64 (/.f64 1 (*.f64 x-scale x-scale)) (sqrt.f64 b)))
(.f64 (/.f64 (/.f64 1 x-scale) x-scale) (.f64 (sqrt.f64 b) (sqrt.f64 b)))
(.f64 (cbrt.f64 (/.f64 b (.f64 x-scale x-scale))) (cbrt.f64 (pow.f64 (/.f64 b (*.f64 x-scale x-scale)) 2)))
(.f64 (cbrt.f64 (pow.f64 (/.f64 b (.f64 x-scale x-scale)) 2)) (cbrt.f64 (/.f64 b (*.f64 x-scale x-scale))))
(.f64 (cbrt.f64 (/.f64 b (.f64 x-scale x-scale))) (cbrt.f64 (pow.f64 (/.f64 b (*.f64 x-scale x-scale)) 2)))
(.f64 (cbrt.f64 (.f64 b b)) (.f64 (cbrt.f64 b) (/.f64 1 (.f64 x-scale x-scale))))
(.f64 (cbrt.f64 (.f64 b b)) (.f64 (/.f64 1 (.f64 x-scale x-scale)) (cbrt.f64 b)))
(.f64 (/.f64 (/.f64 1 x-scale) x-scale) (.f64 (cbrt.f64 b) (cbrt.f64 (*.f64 b b))))
(*.f64 (/.f64 b x-scale) (/.f64 1 x-scale))
(/.f64 b (*.f64 x-scale x-scale))
(.f64 (neg.f64 b) (/.f64 1 (.f64 x-scale (neg.f64 x-scale))))
(.f64 (/.f64 1 (.f64 x-scale x-scale)) b)
(/.f64 b (*.f64 x-scale x-scale))
(*.f64 (/.f64 1 x-scale) (/.f64 b x-scale))
(/.f64 b (*.f64 x-scale x-scale))
(.f64 (/.f64 1 (sqrt.f64 (.f64 x-scale x-scale))) (/.f64 b (sqrt.f64 (*.f64 x-scale x-scale))))
(*.f64 (/.f64 1 (fabs.f64 x-scale)) (/.f64 b (fabs.f64 x-scale)))
(.f64 (/.f64 1 (cbrt.f64 (pow.f64 x-scale 4))) (/.f64 b (cbrt.f64 (.f64 x-scale x-scale))))
(.f64 (pow.f64 (/.f64 b (.f64 x-scale x-scale)) 1/2) (pow.f64 (/.f64 b (*.f64 x-scale x-scale)) 1/2))
(/.f64 b (*.f64 x-scale x-scale))
(.f64 (/.f64 (sqrt.f64 b) 1) (/.f64 (sqrt.f64 b) (.f64 x-scale x-scale)))
(.f64 (sqrt.f64 b) (/.f64 (sqrt.f64 b) (.f64 x-scale x-scale)))
(*.f64 (/.f64 (sqrt.f64 b) x-scale) (/.f64 (sqrt.f64 b) x-scale))
(.f64 (sqrt.f64 b) (/.f64 (sqrt.f64 b) (.f64 x-scale x-scale)))
(.f64 (/.f64 (cbrt.f64 (.f64 b b)) 1) (/.f64 (cbrt.f64 b) (*.f64 x-scale x-scale)))
(.f64 (cbrt.f64 (.f64 b b)) (/.f64 (cbrt.f64 b) (*.f64 x-scale x-scale)))
(.f64 (/.f64 (sqrt.f64 b) (sqrt.f64 (.f64 x-scale x-scale))) (/.f64 (sqrt.f64 b) (sqrt.f64 (*.f64 x-scale x-scale))))
(*.f64 (/.f64 (sqrt.f64 b) (fabs.f64 x-scale)) (/.f64 (sqrt.f64 b) (fabs.f64 x-scale)))
(.f64 (/.f64 (sqrt.f64 b) (cbrt.f64 (pow.f64 x-scale 4))) (/.f64 (sqrt.f64 b) (cbrt.f64 (.f64 x-scale x-scale))))
(.f64 (/.f64 (cbrt.f64 (.f64 b b)) x-scale) (/.f64 (cbrt.f64 b) x-scale))
(.f64 (cbrt.f64 (.f64 b b)) (/.f64 (cbrt.f64 b) (*.f64 x-scale x-scale)))
(.f64 (/.f64 (cbrt.f64 (.f64 b b)) (sqrt.f64 (.f64 x-scale x-scale))) (/.f64 (cbrt.f64 b) (sqrt.f64 (.f64 x-scale x-scale))))
(.f64 (/.f64 (cbrt.f64 (.f64 b b)) (fabs.f64 x-scale)) (/.f64 (cbrt.f64 b) (fabs.f64 x-scale)))
(/.f64 (.f64 (/.f64 (cbrt.f64 b) (fabs.f64 x-scale)) (cbrt.f64 (.f64 b b))) (fabs.f64 x-scale))
(.f64 (/.f64 (cbrt.f64 (.f64 b b)) (cbrt.f64 (pow.f64 x-scale 4))) (/.f64 (cbrt.f64 b) (cbrt.f64 (*.f64 x-scale x-scale))))
(/.f64 (cbrt.f64 (.f64 b b)) (/.f64 (cbrt.f64 (pow.f64 x-scale 4)) (/.f64 (cbrt.f64 b) (cbrt.f64 (.f64 x-scale x-scale)))))
(pow.f64 (/.f64 b (*.f64 x-scale x-scale)) 1)
(/.f64 b (*.f64 x-scale x-scale))
(neg.f64 (/.f64 b (*.f64 x-scale (neg.f64 x-scale))))
(/.f64 (neg.f64 b) (*.f64 x-scale (neg.f64 x-scale)))
(log.f64 (exp.f64 (/.f64 b (*.f64 x-scale x-scale))))
(/.f64 b (*.f64 x-scale x-scale))
(cbrt.f64 (.f64 (/.f64 b (.f64 x-scale x-scale)) (pow.f64 (/.f64 b (*.f64 x-scale x-scale)) 2)))
(expm1.f64 (log1p.f64 (/.f64 b (*.f64 x-scale x-scale))))
(/.f64 b (*.f64 x-scale x-scale))
(exp.f64 (log.f64 (/.f64 b (*.f64 x-scale x-scale))))
(/.f64 b (*.f64 x-scale x-scale))
(log1p.f64 (expm1.f64 (/.f64 b (*.f64 x-scale x-scale))))
(/.f64 b (*.f64 x-scale x-scale))
(.f64 y-scale (/.f64 1 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) 1)
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(.f64 1 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(.f64 (sqrt.f64 y-scale) (.f64 (sqrt.f64 y-scale) (/.f64 1 (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))))))
(.f64 (sqrt.f64 y-scale) (/.f64 (.f64 (sqrt.f64 y-scale) 1) (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 (/.f64 1 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (*.f64 (sqrt.f64 y-scale) (sqrt.f64 y-scale)))
(.f64 (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (sqrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))))))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(.f64 (cbrt.f64 (.f64 y-scale y-scale)) (.f64 (cbrt.f64 y-scale) (/.f64 1 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))))
(.f64 (cbrt.f64 (.f64 y-scale y-scale)) (/.f64 (.f64 (cbrt.f64 y-scale) 1) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))
(.f64 (/.f64 1 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (.f64 (cbrt.f64 y-scale) (cbrt.f64 (.f64 y-scale y-scale))))
(.f64 (cbrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (cbrt.f64 (pow.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a))))) 2)))
(.f64 (cbrt.f64 (pow.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) 2)) (cbrt.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 (cbrt.f64 (pow.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) 2)) (cbrt.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))))))
(.f64 (cbrt.f64 (pow.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) 2)) (cbrt.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 (/.f64 y-scale angle) (/.f64 1 (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(.f64 (/.f64 1 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) y-scale)
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(.f64 (neg.f64 y-scale) (/.f64 1 (.f64 angle (neg.f64 (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))))
(.f64 (neg.f64 y-scale) (/.f64 1 (.f64 angle (.f64 (neg.f64 (-.f64 b a)) (.f64 (PI.f64) (+.f64 a b))))))
(.f64 (/.f64 1 angle) (/.f64 y-scale (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(.f64 (/.f64 1 (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))) (/.f64 y-scale angle))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(.f64 (/.f64 1 (sqrt.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (/.f64 y-scale (sqrt.f64 (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))))))
(.f64 (/.f64 1 (sqrt.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))) (/.f64 y-scale (sqrt.f64 (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b)))))))
(.f64 (/.f64 1 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) 2))) (/.f64 y-scale (cbrt.f64 (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))))))
(/.f64 (.f64 1 (/.f64 y-scale (cbrt.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))) (cbrt.f64 (pow.f64 (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b)))) 2)))
(.f64 (/.f64 1 (.f64 angle (+.f64 b a))) (/.f64 y-scale (*.f64 (-.f64 b a) (PI.f64))))
(.f64 (/.f64 1 (.f64 angle (+.f64 a b))) (/.f64 y-scale (*.f64 (-.f64 b a) (PI.f64))))
(/.f64 (.f64 (/.f64 (/.f64 y-scale (-.f64 b a)) (PI.f64)) 1) (.f64 angle (+.f64 a b)))
(.f64 (pow.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) 1/2) (pow.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a))))) 1/2))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(.f64 (/.f64 (sqrt.f64 y-scale) angle) (/.f64 (sqrt.f64 y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))))
(.f64 (/.f64 (sqrt.f64 y-scale) angle) (/.f64 (sqrt.f64 y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b)))))
(/.f64 (.f64 (sqrt.f64 y-scale) (/.f64 (sqrt.f64 y-scale) angle)) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))
(.f64 (/.f64 (sqrt.f64 y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))) (/.f64 (sqrt.f64 y-scale) angle))
(.f64 (/.f64 (sqrt.f64 y-scale) angle) (/.f64 (sqrt.f64 y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b)))))
(/.f64 (.f64 (sqrt.f64 y-scale) (/.f64 (sqrt.f64 y-scale) angle)) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))
(.f64 (/.f64 (sqrt.f64 y-scale) 1) (/.f64 (sqrt.f64 y-scale) (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))))
(.f64 (/.f64 (sqrt.f64 y-scale) angle) (/.f64 (sqrt.f64 y-scale) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b)))))
(/.f64 (.f64 (sqrt.f64 y-scale) (/.f64 (sqrt.f64 y-scale) angle)) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))
(.f64 (/.f64 (sqrt.f64 y-scale) (sqrt.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (/.f64 (sqrt.f64 y-scale) (sqrt.f64 (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))))))
(.f64 (/.f64 (sqrt.f64 y-scale) (sqrt.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))) (/.f64 (sqrt.f64 y-scale) (sqrt.f64 (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b)))))))
(.f64 (/.f64 (sqrt.f64 y-scale) (cbrt.f64 (pow.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) 2))) (/.f64 (sqrt.f64 y-scale) (cbrt.f64 (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))))))
(/.f64 (.f64 (sqrt.f64 y-scale) (/.f64 (sqrt.f64 y-scale) (cbrt.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))) (cbrt.f64 (pow.f64 (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b)))) 2)))
(.f64 (/.f64 (sqrt.f64 y-scale) (.f64 angle (+.f64 b a))) (/.f64 (sqrt.f64 y-scale) (*.f64 (-.f64 b a) (PI.f64))))
(.f64 (/.f64 (sqrt.f64 y-scale) (.f64 angle (+.f64 a b))) (/.f64 (sqrt.f64 y-scale) (*.f64 (-.f64 b a) (PI.f64))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 y-scale) angle) (+.f64 a b)) (/.f64 (/.f64 (sqrt.f64 y-scale) (-.f64 b a)) (PI.f64)))
(.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) angle) (/.f64 (cbrt.f64 y-scale) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))
(.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) angle) (/.f64 (cbrt.f64 y-scale) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))
(.f64 (cbrt.f64 (.f64 y-scale y-scale)) (/.f64 (cbrt.f64 y-scale) (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) (/.f64 (cbrt.f64 y-scale) angle))
(.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) angle) (/.f64 (cbrt.f64 y-scale) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))
(.f64 (cbrt.f64 (.f64 y-scale y-scale)) (/.f64 (cbrt.f64 y-scale) (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) 1) (/.f64 (cbrt.f64 y-scale) (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a))))))
(.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) angle) (/.f64 (cbrt.f64 y-scale) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))
(.f64 (cbrt.f64 (.f64 y-scale y-scale)) (/.f64 (cbrt.f64 y-scale) (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b))))))
(.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (sqrt.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))) (/.f64 (cbrt.f64 y-scale) (sqrt.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))))
(.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (sqrt.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))) (/.f64 (cbrt.f64 y-scale) (sqrt.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))))
(.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (cbrt.f64 (pow.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))) 2))) (/.f64 (cbrt.f64 y-scale) (cbrt.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a)))))))
(/.f64 (.f64 (cbrt.f64 (.f64 y-scale y-scale)) (/.f64 (cbrt.f64 y-scale) (cbrt.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))))) (cbrt.f64 (pow.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) 2)))
(.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (cbrt.f64 (pow.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) 2))) (/.f64 (cbrt.f64 y-scale) (cbrt.f64 (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))))))
(.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (.f64 angle (+.f64 b a))) (/.f64 (cbrt.f64 y-scale) (.f64 (-.f64 b a) (PI.f64))))
(.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (*.f64 angle (+.f64 a b))) (/.f64 (/.f64 (cbrt.f64 y-scale) (-.f64 b a)) (PI.f64)))
(.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (.f64 angle (+.f64 a b))) (/.f64 (cbrt.f64 y-scale) (.f64 (-.f64 b a) (PI.f64))))
(pow.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a))))) 1)
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(neg.f64 (/.f64 y-scale (.f64 angle (neg.f64 (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))))))
(/.f64 (neg.f64 y-scale) (.f64 angle (.f64 (neg.f64 (-.f64 b a)) (*.f64 (PI.f64) (+.f64 a b)))))
(log.f64 (exp.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))))))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(cbrt.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 b a))))) (pow.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a))))) 2)))
(cbrt.f64 (.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b)))) (pow.f64 (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b)))) 2)))
(expm1.f64 (log1p.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))))))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(exp.f64 (log.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))))))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))
(log1p.f64 (expm1.f64 (/.f64 y-scale (.f64 angle (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 b a)))))))
(/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))

localize63.0ms (0%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	99.5%	(/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
✓	94.2%	(.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
	62.0%	(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
	61.5%	(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))

Compiler

Compiled 133 to 75 computations (43.6% saved)

series14.0ms (0%)

Counts

2 → 60

Calls

15 calls:

Time	Variable		Point	Expression
2.0ms	angle	@	inf	(.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
2.0ms	angle	@	-inf	(/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
1.0ms	angle	@	0	(.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
1.0ms	x-scale	@	inf	(.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
1.0ms	angle	@	-inf	(.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))

rewrite144.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

1768×	`associate-/l*`
520×	`associate-/r/`
454×	`associate-/l/`
378×	`distribute-rgt-in`
364×	`add-sqr-sqrt`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	17	108
1	354	104
2	4676	104

Stop Event

1×	node limit

Counts

2 → 145

Calls

Call 1

Inputs

(*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))))

(/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))

Outputs

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

(((+.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 0) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((+.f64 0 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((+.f64 (-.f64 0 (exp.f64 (log1p.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((-.f64 0 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((-.f64 (exp.f64 (log1p.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((-.f64 (+.f64 0 (exp.f64 (log1p.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (/.f64 1 x-scale) (/.f64 1 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 (/.f64 1 x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (/.f64 1 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (neg.f64 (/.f64 1 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 1 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (sqrt.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (sqrt.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (sqrt.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (sqrt.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) (*.f64 (sqrt.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) (/.f64 1 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (sqrt.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) (/.f64 (sqrt.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (cbrt.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) 2) (cbrt.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) 2) (neg.f64 (cbrt.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) 2) (*.f64 (cbrt.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) (/.f64 1 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (neg.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) (/.f64 1 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (neg.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) (/.f64 1 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 -1 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 1 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 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 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 1 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 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 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (*.f64 -1 (sqrt.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (sqrt.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (*.f64 -1 (pow.f64 (cbrt.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) 2)) (cbrt.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 1 (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 1 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 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 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 1) (/.f64 (/.f64 1 x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 1 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 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (neg.f64 (sqrt.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (sqrt.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (neg.f64 (pow.f64 (cbrt.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) 2)) (cbrt.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 1 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (neg.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 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 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (sqrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 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 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (cbrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 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 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (/.f64 1 x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (/.f64 (/.f64 1 x-scale) (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (/.f64 (/.f64 1 x-scale) (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (sqrt.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 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 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (sqrt.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (/.f64 (sqrt.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) 2) 1) (/.f64 (cbrt.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) 2) (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (/.f64 (cbrt.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) 2) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (cbrt.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (sqrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 x-scale (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (sqrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) 2) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (cbrt.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 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 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 1 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (pow.f64 (cbrt.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) 2))) (cbrt.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 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 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (*.f64 x-scale (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (cbrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 -1 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 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 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 -1 (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 -1 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 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 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 -1 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (/.f64 1 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 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 -1 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 1)) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 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 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 -1 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (sqrt.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)))) (sqrt.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 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 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 -1 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (pow.f64 (cbrt.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) 2))) (cbrt.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 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 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (/.f64 1 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (/.f64 1 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 1) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 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 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (/.f64 1 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 x-scale)) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (sqrt.f64 x-scale))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (/.f64 1 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cbrt.f64 x-scale))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (/.f64 1 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale)) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (/.f64 1 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 x-scale 1)) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (/.f64 1 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 x-scale (sqrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (sqrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (/.f64 1 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 x-scale (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>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 x-scale (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 1) 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 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) 1) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (sqrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (/.f64 x-scale (/.f64 (sqrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (sqrt.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (sqrt.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 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 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (/.f64 x-scale (/.f64 (cbrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (pow.f64 (cbrt.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) 2)) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cbrt.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 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 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (neg.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (neg.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) -1) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) -1) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (/.f64 1 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (/.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 x-scale (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (neg.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>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (neg.f64 (*.f64 x-scale (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (*.f64 -1 (neg.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)))) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 1 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) 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 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (*.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 1 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (neg.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>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (/.f64 (neg.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (/.f64 (neg.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2))) (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) 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 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) x-scale))) (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (neg.f64 (neg.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)))) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (neg.f64 (neg.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)))) (neg.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2))) (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3))) (+.f64 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) 0)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((*.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (*.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 1)) (*.f64 (neg.f64 x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((pow.f64 (sqrt.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((pow.f64 (cbrt.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((pow.f64 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((sqrt.f64 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((log.f64 (exp.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((cbrt.f64 (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((cbrt.f64 (/.f64 (pow.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) 3) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((expm1.f64 (log1p.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((exp.f64 (log.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((exp.f64 (*.f64 (log.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)) ((log1p.f64 (expm1.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) x-scale) (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))))) #f)))

simplify180.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

1366×	`distribute-lft-neg-in`
692×	`associate-r`
634×	`associate-+r+`
622×	`*-commutative`
516×	`associate-l`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	448	14095
1	1334	13903
2	5531	13815

Stop Event

1×	node limit

Counts

205 → 223

Calls

Call 1

Inputs
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -180 (/.f64 y-scale (.f64 x-scale (*.f64 angle (PI.f64)))))
(+.f64 (.f64 -1 (.f64 angle (-.f64 (.f64 -1/360 (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.f64 -1/1080 (/.f64 (.f64 y-scale (PI.f64)) x-scale))))) (.f64 -180 (/.f64 y-scale (.f64 x-scale (*.f64 angle (PI.f64))))))
(+.f64 (.f64 -1 (.f64 angle (-.f64 (.f64 -1/360 (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.f64 -1/1080 (/.f64 (.f64 y-scale (PI.f64)) x-scale))))) (+.f64 (.f64 -180 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64))))) (.f64 -1 (.f64 (pow.f64 angle 3) (-.f64 (.f64 1/139968000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (+.f64 (.f64 1/699840000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/194400 (.f64 (-.f64 (.f64 -1/360 (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.f64 -1/1080 (/.f64 (*.f64 y-scale (PI.f64)) x-scale))) (pow.f64 (PI.f64) 2)))))))))
(+.f64 (.f64 -1 (.f64 angle (-.f64 (.f64 -1/360 (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.f64 -1/1080 (/.f64 (.f64 y-scale (PI.f64)) x-scale))))) (+.f64 (.f64 -1 (.f64 (pow.f64 angle 5) (-.f64 (.f64 -1/136048896000000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 5)) x-scale)) (+.f64 (.f64 1/125971200000 (.f64 (-.f64 (.f64 -1/360 (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.f64 -1/1080 (/.f64 (.f64 y-scale (PI.f64)) x-scale))) (pow.f64 (PI.f64) 4))) (+.f64 (.f64 -1/194400 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 1/139968000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (+.f64 (.f64 1/699840000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/194400 (.f64 (-.f64 (.f64 -1/360 (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.f64 -1/1080 (/.f64 (.f64 y-scale (PI.f64)) x-scale))) (pow.f64 (PI.f64) 2))))))) (.f64 -1/952342272000000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 5)) x-scale))))))) (+.f64 (.f64 -180 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64))))) (.f64 -1 (.f64 (pow.f64 angle 3) (-.f64 (.f64 1/139968000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (+.f64 (.f64 1/699840000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/194400 (.f64 (-.f64 (.f64 -1/360 (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.f64 -1/1080 (/.f64 (*.f64 y-scale (PI.f64)) x-scale))) (pow.f64 (PI.f64) 2))))))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(/.f64 180 (.f64 x-scale (.f64 angle (PI.f64))))
(+.f64 (.f64 180 (/.f64 1 (.f64 x-scale (.f64 angle (PI.f64))))) (.f64 (-.f64 (.f64 -1/360 (/.f64 (PI.f64) x-scale)) (.f64 -1/1080 (/.f64 (PI.f64) x-scale))) angle))
(+.f64 (.f64 (pow.f64 angle 3) (-.f64 (.f64 1/139968000 (/.f64 (pow.f64 (PI.f64) 3) x-scale)) (+.f64 (.f64 -1/194400 (.f64 (-.f64 (.f64 -1/360 (/.f64 (PI.f64) x-scale)) (.f64 -1/1080 (/.f64 (PI.f64) x-scale))) (pow.f64 (PI.f64) 2))) (.f64 1/699840000 (/.f64 (pow.f64 (PI.f64) 3) x-scale))))) (+.f64 (.f64 180 (/.f64 1 (.f64 x-scale (.f64 angle (PI.f64))))) (.f64 (-.f64 (.f64 -1/360 (/.f64 (PI.f64) x-scale)) (*.f64 -1/1080 (/.f64 (PI.f64) x-scale))) angle)))
(+.f64 (.f64 (pow.f64 angle 3) (-.f64 (.f64 1/139968000 (/.f64 (pow.f64 (PI.f64) 3) x-scale)) (+.f64 (.f64 -1/194400 (.f64 (-.f64 (.f64 -1/360 (/.f64 (PI.f64) x-scale)) (.f64 -1/1080 (/.f64 (PI.f64) x-scale))) (pow.f64 (PI.f64) 2))) (.f64 1/699840000 (/.f64 (pow.f64 (PI.f64) 3) x-scale))))) (+.f64 (.f64 180 (/.f64 1 (.f64 x-scale (.f64 angle (PI.f64))))) (+.f64 (.f64 (-.f64 (.f64 -1/136048896000000 (/.f64 (pow.f64 (PI.f64) 5) x-scale)) (+.f64 (.f64 -1/952342272000000 (/.f64 (pow.f64 (PI.f64) 5) x-scale)) (+.f64 (.f64 1/125971200000 (.f64 (-.f64 (.f64 -1/360 (/.f64 (PI.f64) x-scale)) (.f64 -1/1080 (/.f64 (PI.f64) x-scale))) (pow.f64 (PI.f64) 4))) (.f64 -1/194400 (.f64 (-.f64 (.f64 1/139968000 (/.f64 (pow.f64 (PI.f64) 3) x-scale)) (+.f64 (.f64 -1/194400 (.f64 (-.f64 (.f64 -1/360 (/.f64 (PI.f64) x-scale)) (.f64 -1/1080 (/.f64 (PI.f64) x-scale))) (pow.f64 (PI.f64) 2))) (.f64 1/699840000 (/.f64 (pow.f64 (PI.f64) 3) x-scale)))) (pow.f64 (PI.f64) 2)))))) (pow.f64 angle 5)) (.f64 (-.f64 (.f64 -1/360 (/.f64 (PI.f64) x-scale)) (.f64 -1/1080 (/.f64 (PI.f64) x-scale))) angle))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(+.f64 0 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(+.f64 (-.f64 0 (exp.f64 (log1p.f64 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))) 1)
(+.f64 (.f64 y-scale 0) (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(+.f64 (.f64 (.f64 y-scale -1) 0) (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(+.f64 (.f64 (neg.f64 y-scale) 0) (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(+.f64 (.f64 0 y-scale) (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(+.f64 (.f64 0 (.f64 y-scale -1)) (.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 y-scale -1)))
(+.f64 (.f64 0 (neg.f64 y-scale)) (.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (neg.f64 y-scale)))
(-.f64 0 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(-.f64 (exp.f64 (log1p.f64 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))) 1)
(/.f64 y-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 1 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) y-scale))
(/.f64 (sqrt.f64 y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (sqrt.f64 y-scale)))
(/.f64 (cbrt.f64 y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 y-scale) 2)))
(/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (cbrt.f64 y-scale)))
(/.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale))
(/.f64 (.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(/.f64 (.f64 y-scale (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(/.f64 (.f64 y-scale (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))) (neg.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) y-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(pow.f64 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 1)
(pow.f64 (sqrt.f64 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) 2)
(pow.f64 (cbrt.f64 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) 3)
(pow.f64 (pow.f64 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 3) 1/3)
(neg.f64 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(sqrt.f64 (pow.f64 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 2))
(log.f64 (pow.f64 (exp.f64 y-scale) (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(log.f64 (+.f64 1 (expm1.f64 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))))
(cbrt.f64 (pow.f64 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 3))
(cbrt.f64 (.f64 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (pow.f64 y-scale 3)))
(cbrt.f64 (.f64 (pow.f64 y-scale 3) (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 3)))
(expm1.f64 (log1p.f64 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(exp.f64 (log.f64 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(exp.f64 (.f64 (log.f64 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 1))
(log1p.f64 (expm1.f64 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(+.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 0)
(+.f64 0 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(+.f64 (-.f64 0 (exp.f64 (log1p.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) 1)
(-.f64 0 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(-.f64 (exp.f64 (log1p.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 1)
(-.f64 (+.f64 0 (exp.f64 (log1p.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) 1)
(.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (/.f64 1 x-scale) (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (/.f64 1 x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (/.f64 1 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (neg.f64 (/.f64 1 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 1)
(.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) -1)
(.f64 1 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (sqrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sqrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (sqrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (.f64 (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (/.f64 (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (cbrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 2))
(.f64 (pow.f64 (cbrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2) (cbrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (pow.f64 (cbrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2) (neg.f64 (cbrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 (pow.f64 (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) 2) (.f64 (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (/.f64 1 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (/.f64 1 (neg.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 -1 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)))
(.f64 (.f64 -1 (sqrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (sqrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (.f64 -1 (pow.f64 (cbrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2)) (cbrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (/.f64 1 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale)))
(.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1) (/.f64 (/.f64 1 x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 1 x-scale))
(.f64 (neg.f64 (sqrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (sqrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (neg.f64 (pow.f64 (cbrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2)) (cbrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 1 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)))
(.f64 (/.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))
(.f64 (/.f64 (/.f64 1 x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (/.f64 1 x-scale) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (/.f64 1 x-scale) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)))
(.f64 (/.f64 (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) 2) 1) (/.f64 (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) 2) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) 2) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (cbrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) 2) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)))
(.f64 (/.f64 1 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) 2))) (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (/.f64 -1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (/.f64 -1 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 -1 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale)))
(.f64 (/.f64 -1 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (/.f64 1 x-scale))
(.f64 (/.f64 -1 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1)) (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (/.f64 -1 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)))) (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)))
(.f64 (/.f64 -1 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) 2))) (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)))
(.f64 (/.f64 (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 1) (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (/.f64 (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 x-scale)) (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (sqrt.f64 x-scale)))
(.f64 (/.f64 (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (cbrt.f64 x-scale)))
(.f64 (/.f64 (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (neg.f64 x-scale)) (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale 1)) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (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 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1) x-scale))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) 1) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 x-scale (/.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 x-scale (/.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (pow.f64 (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) 2)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))) (neg.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) -1) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) -1) (neg.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 x-scale)))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 -1 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)))) (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) x-scale)
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (neg.f64 x-scale))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) x-scale)
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) x-scale))) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (neg.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)))) (neg.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (neg.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)))) (neg.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3))) (+.f64 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2) 0))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 1)) (.f64 (neg.f64 x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 1)
(pow.f64 (sqrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2)
(pow.f64 (cbrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 3)
(pow.f64 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3) 1/3)
(pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) -1)
(neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(sqrt.f64 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))
(log.f64 (exp.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(log.f64 (+.f64 1 (expm1.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(cbrt.f64 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3))
(cbrt.f64 (/.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) 3) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)))
(expm1.f64 (log1p.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(exp.f64 (log.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(exp.f64 (.f64 (log.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 1))
(log1p.f64 (expm1.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))

Outputs
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 -180 (/.f64 y-scale (.f64 x-scale (*.f64 angle (PI.f64)))))
(/.f64 (.f64 -180 y-scale) (.f64 (*.f64 x-scale angle) (PI.f64)))
(/.f64 (.f64 y-scale -180) (.f64 angle (*.f64 (PI.f64) x-scale)))
(+.f64 (.f64 -1 (.f64 angle (-.f64 (.f64 -1/360 (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.f64 -1/1080 (/.f64 (.f64 y-scale (PI.f64)) x-scale))))) (.f64 -180 (/.f64 y-scale (.f64 x-scale (*.f64 angle (PI.f64))))))
(fma.f64 -1 (.f64 angle (.f64 (/.f64 y-scale (/.f64 x-scale (PI.f64))) -1/540)) (/.f64 (.f64 -180 y-scale) (.f64 (*.f64 x-scale angle) (PI.f64))))
(-.f64 (/.f64 (.f64 y-scale -180) (.f64 angle (.f64 (PI.f64) x-scale))) (.f64 angle (/.f64 (*.f64 y-scale -1/540) (/.f64 x-scale (PI.f64)))))
(fma.f64 -180 (/.f64 y-scale (.f64 angle (.f64 (PI.f64) x-scale))) (.f64 angle (.f64 1/540 (*.f64 (/.f64 y-scale x-scale) (PI.f64)))))
(+.f64 (.f64 -1 (.f64 angle (-.f64 (.f64 -1/360 (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.f64 -1/1080 (/.f64 (.f64 y-scale (PI.f64)) x-scale))))) (+.f64 (.f64 -180 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64))))) (.f64 -1 (.f64 (pow.f64 angle 3) (-.f64 (.f64 1/139968000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (+.f64 (.f64 1/699840000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/194400 (.f64 (-.f64 (.f64 -1/360 (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.f64 -1/1080 (/.f64 (*.f64 y-scale (PI.f64)) x-scale))) (pow.f64 (PI.f64) 2)))))))))
(fma.f64 -1 (.f64 angle (.f64 (/.f64 y-scale (/.f64 x-scale (PI.f64))) -1/540)) (fma.f64 -180 (/.f64 y-scale (.f64 (.f64 x-scale angle) (PI.f64))) (neg.f64 (.f64 (pow.f64 angle 3) (-.f64 (.f64 1/139968000 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 3)))) (fma.f64 1/699840000 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 3))) (.f64 -1/194400 (.f64 (*.f64 (/.f64 y-scale (/.f64 x-scale (PI.f64))) -1/540) (pow.f64 (PI.f64) 2)))))))))
(-.f64 (-.f64 (/.f64 (.f64 y-scale -180) (.f64 angle (.f64 (PI.f64) x-scale))) (.f64 angle (/.f64 (.f64 y-scale -1/540) (/.f64 x-scale (PI.f64))))) (.f64 (pow.f64 angle 3) (+.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) 1/174960000) (.f64 1/194400 (.f64 (.f64 (/.f64 y-scale x-scale) (PI.f64)) (.f64 -1/540 (pow.f64 (PI.f64) 2)))))))
(-.f64 (fma.f64 -180 (/.f64 y-scale (.f64 angle (.f64 (PI.f64) x-scale))) (.f64 angle (.f64 1/540 (.f64 (/.f64 y-scale x-scale) (PI.f64))))) (.f64 (pow.f64 angle 3) (+.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) 1/174960000) (.f64 (.f64 1/540 (.f64 (/.f64 y-scale x-scale) (PI.f64))) (.f64 -1/194400 (pow.f64 (PI.f64) 2))))))
(+.f64 (.f64 -1 (.f64 angle (-.f64 (.f64 -1/360 (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.f64 -1/1080 (/.f64 (.f64 y-scale (PI.f64)) x-scale))))) (+.f64 (.f64 -1 (.f64 (pow.f64 angle 5) (-.f64 (.f64 -1/136048896000000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 5)) x-scale)) (+.f64 (.f64 1/125971200000 (.f64 (-.f64 (.f64 -1/360 (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.f64 -1/1080 (/.f64 (.f64 y-scale (PI.f64)) x-scale))) (pow.f64 (PI.f64) 4))) (+.f64 (.f64 -1/194400 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 1/139968000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (+.f64 (.f64 1/699840000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/194400 (.f64 (-.f64 (.f64 -1/360 (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.f64 -1/1080 (/.f64 (.f64 y-scale (PI.f64)) x-scale))) (pow.f64 (PI.f64) 2))))))) (.f64 -1/952342272000000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 5)) x-scale))))))) (+.f64 (.f64 -180 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64))))) (.f64 -1 (.f64 (pow.f64 angle 3) (-.f64 (.f64 1/139968000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (+.f64 (.f64 1/699840000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/194400 (.f64 (-.f64 (.f64 -1/360 (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.f64 -1/1080 (/.f64 (*.f64 y-scale (PI.f64)) x-scale))) (pow.f64 (PI.f64) 2))))))))))
(fma.f64 -1 (.f64 angle (.f64 (/.f64 y-scale (/.f64 x-scale (PI.f64))) -1/540)) (fma.f64 -1 (.f64 (pow.f64 angle 5) (-.f64 (.f64 -1/136048896000000 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 5)))) (fma.f64 1/125971200000 (.f64 (.f64 (/.f64 y-scale (/.f64 x-scale (PI.f64))) -1/540) (pow.f64 (PI.f64) 4)) (fma.f64 -1/194400 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 1/139968000 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 3)))) (fma.f64 1/699840000 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 3))) (.f64 -1/194400 (.f64 (.f64 (/.f64 y-scale (/.f64 x-scale (PI.f64))) -1/540) (pow.f64 (PI.f64) 2)))))) (.f64 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 5))) -1/952342272000000))))) (fma.f64 -180 (/.f64 y-scale (.f64 (.f64 x-scale angle) (PI.f64))) (neg.f64 (.f64 (pow.f64 angle 3) (-.f64 (.f64 1/139968000 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 3)))) (fma.f64 1/699840000 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 3))) (.f64 -1/194400 (.f64 (*.f64 (/.f64 y-scale (/.f64 x-scale (PI.f64))) -1/540) (pow.f64 (PI.f64) 2))))))))))
(-.f64 (-.f64 (-.f64 (/.f64 (.f64 y-scale -180) (.f64 angle (.f64 (PI.f64) x-scale))) (.f64 (pow.f64 angle 3) (+.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) 1/174960000) (.f64 1/194400 (.f64 (.f64 (/.f64 y-scale x-scale) (PI.f64)) (.f64 -1/540 (pow.f64 (PI.f64) 2))))))) (.f64 (pow.f64 angle 5) (-.f64 (.f64 -1/136048896000000 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 5))) (fma.f64 1/125971200000 (.f64 (.f64 (/.f64 y-scale x-scale) (PI.f64)) (.f64 -1/540 (pow.f64 (PI.f64) 4))) (fma.f64 -1/194400 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) 1/174960000) (.f64 1/194400 (.f64 (.f64 (/.f64 y-scale x-scale) (PI.f64)) (.f64 -1/540 (pow.f64 (PI.f64) 2)))))) (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 5)) -1/952342272000000)))))) (.f64 angle (/.f64 (*.f64 y-scale -1/540) (/.f64 x-scale (PI.f64)))))
(-.f64 (-.f64 (fma.f64 -180 (/.f64 y-scale (.f64 angle (.f64 (PI.f64) x-scale))) (.f64 angle (.f64 1/540 (.f64 (/.f64 y-scale x-scale) (PI.f64))))) (.f64 (pow.f64 angle 3) (+.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) 1/174960000) (.f64 (.f64 1/540 (.f64 (/.f64 y-scale x-scale) (PI.f64))) (.f64 -1/194400 (pow.f64 (PI.f64) 2)))))) (.f64 (pow.f64 angle 5) (-.f64 (fma.f64 -1/136048896000000 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 5)) (.f64 (.f64 1/540 (.f64 (/.f64 y-scale x-scale) (PI.f64))) (.f64 (pow.f64 (PI.f64) 4) 1/125971200000))) (fma.f64 -1/194400 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) 1/174960000) (.f64 (.f64 1/540 (.f64 (/.f64 y-scale x-scale) (PI.f64))) (.f64 -1/194400 (pow.f64 (PI.f64) 2))))) (.f64 (*.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 5)) -1/952342272000000)))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 180 (.f64 x-scale (.f64 angle (PI.f64))))
(/.f64 180 (.f64 (.f64 x-scale angle) (PI.f64)))
(/.f64 180 (.f64 angle (.f64 (PI.f64) x-scale)))
(+.f64 (.f64 180 (/.f64 1 (.f64 x-scale (.f64 angle (PI.f64))))) (.f64 (-.f64 (.f64 -1/360 (/.f64 (PI.f64) x-scale)) (.f64 -1/1080 (/.f64 (PI.f64) x-scale))) angle))
(+.f64 (/.f64 180 (.f64 (.f64 x-scale angle) (PI.f64))) (.f64 angle (.f64 (/.f64 (PI.f64) x-scale) -1/540)))
(fma.f64 angle (/.f64 (.f64 (PI.f64) -1/540) x-scale) (/.f64 180 (.f64 angle (*.f64 (PI.f64) x-scale))))
(+.f64 (.f64 (pow.f64 angle 3) (-.f64 (.f64 1/139968000 (/.f64 (pow.f64 (PI.f64) 3) x-scale)) (+.f64 (.f64 -1/194400 (.f64 (-.f64 (.f64 -1/360 (/.f64 (PI.f64) x-scale)) (.f64 -1/1080 (/.f64 (PI.f64) x-scale))) (pow.f64 (PI.f64) 2))) (.f64 1/699840000 (/.f64 (pow.f64 (PI.f64) 3) x-scale))))) (+.f64 (.f64 180 (/.f64 1 (.f64 x-scale (.f64 angle (PI.f64))))) (.f64 (-.f64 (.f64 -1/360 (/.f64 (PI.f64) x-scale)) (*.f64 -1/1080 (/.f64 (PI.f64) x-scale))) angle)))
(fma.f64 (pow.f64 angle 3) (-.f64 (/.f64 (.f64 1/139968000 (pow.f64 (PI.f64) 3)) x-scale) (fma.f64 -1/194400 (.f64 (pow.f64 (PI.f64) 2) (.f64 (/.f64 (PI.f64) x-scale) -1/540)) (.f64 1/699840000 (/.f64 (pow.f64 (PI.f64) 3) x-scale)))) (+.f64 (/.f64 180 (.f64 (.f64 x-scale angle) (PI.f64))) (.f64 angle (.f64 (/.f64 (PI.f64) x-scale) -1/540))))
(fma.f64 (pow.f64 angle 3) (-.f64 (/.f64 (.f64 1/139968000 (pow.f64 (PI.f64) 3)) x-scale) (fma.f64 1/699840000 (/.f64 (pow.f64 (PI.f64) 3) x-scale) (.f64 -1/194400 (.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 (PI.f64) -1/540) x-scale))))) (fma.f64 angle (/.f64 (.f64 (PI.f64) -1/540) x-scale) (/.f64 180 (.f64 angle (*.f64 (PI.f64) x-scale)))))
(fma.f64 (pow.f64 angle 3) (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 3) x-scale) 1/174960000) (.f64 -1/194400 (.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 (PI.f64) -1/540) x-scale)))) (fma.f64 angle (/.f64 (.f64 (PI.f64) -1/540) x-scale) (/.f64 180 (.f64 angle (*.f64 (PI.f64) x-scale)))))
(+.f64 (.f64 (pow.f64 angle 3) (-.f64 (.f64 1/139968000 (/.f64 (pow.f64 (PI.f64) 3) x-scale)) (+.f64 (.f64 -1/194400 (.f64 (-.f64 (.f64 -1/360 (/.f64 (PI.f64) x-scale)) (.f64 -1/1080 (/.f64 (PI.f64) x-scale))) (pow.f64 (PI.f64) 2))) (.f64 1/699840000 (/.f64 (pow.f64 (PI.f64) 3) x-scale))))) (+.f64 (.f64 180 (/.f64 1 (.f64 x-scale (.f64 angle (PI.f64))))) (+.f64 (.f64 (-.f64 (.f64 -1/136048896000000 (/.f64 (pow.f64 (PI.f64) 5) x-scale)) (+.f64 (.f64 -1/952342272000000 (/.f64 (pow.f64 (PI.f64) 5) x-scale)) (+.f64 (.f64 1/125971200000 (.f64 (-.f64 (.f64 -1/360 (/.f64 (PI.f64) x-scale)) (.f64 -1/1080 (/.f64 (PI.f64) x-scale))) (pow.f64 (PI.f64) 4))) (.f64 -1/194400 (.f64 (-.f64 (.f64 1/139968000 (/.f64 (pow.f64 (PI.f64) 3) x-scale)) (+.f64 (.f64 -1/194400 (.f64 (-.f64 (.f64 -1/360 (/.f64 (PI.f64) x-scale)) (.f64 -1/1080 (/.f64 (PI.f64) x-scale))) (pow.f64 (PI.f64) 2))) (.f64 1/699840000 (/.f64 (pow.f64 (PI.f64) 3) x-scale)))) (pow.f64 (PI.f64) 2)))))) (pow.f64 angle 5)) (.f64 (-.f64 (.f64 -1/360 (/.f64 (PI.f64) x-scale)) (.f64 -1/1080 (/.f64 (PI.f64) x-scale))) angle))))
(fma.f64 (pow.f64 angle 3) (-.f64 (/.f64 (.f64 1/139968000 (pow.f64 (PI.f64) 3)) x-scale) (fma.f64 -1/194400 (.f64 (pow.f64 (PI.f64) 2) (.f64 (/.f64 (PI.f64) x-scale) -1/540)) (.f64 1/699840000 (/.f64 (pow.f64 (PI.f64) 3) x-scale)))) (+.f64 (/.f64 180 (.f64 (.f64 x-scale angle) (PI.f64))) (fma.f64 (-.f64 (.f64 -1/136048896000000 (/.f64 (pow.f64 (PI.f64) 5) x-scale)) (fma.f64 -1/952342272000000 (/.f64 (pow.f64 (PI.f64) 5) x-scale) (fma.f64 1/125971200000 (.f64 (pow.f64 (PI.f64) 4) (.f64 (/.f64 (PI.f64) x-scale) -1/540)) (.f64 -1/194400 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (/.f64 (.f64 1/139968000 (pow.f64 (PI.f64) 3)) x-scale) (fma.f64 -1/194400 (.f64 (pow.f64 (PI.f64) 2) (.f64 (/.f64 (PI.f64) x-scale) -1/540)) (.f64 1/699840000 (/.f64 (pow.f64 (PI.f64) 3) x-scale))))))))) (pow.f64 angle 5) (.f64 angle (*.f64 (/.f64 (PI.f64) x-scale) -1/540)))))
(+.f64 (fma.f64 (pow.f64 angle 5) (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 5) x-scale) -1/158723712000000) (fma.f64 -1/194400 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (/.f64 (.f64 1/139968000 (pow.f64 (PI.f64) 3)) x-scale) (fma.f64 1/699840000 (/.f64 (pow.f64 (PI.f64) 3) x-scale) (.f64 -1/194400 (.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 (PI.f64) -1/540) x-scale)))))) (.f64 (pow.f64 (PI.f64) 4) (.f64 1/125971200000 (/.f64 (.f64 (PI.f64) -1/540) x-scale))))) (.f64 angle (/.f64 (.f64 (PI.f64) -1/540) x-scale))) (fma.f64 (pow.f64 angle 3) (-.f64 (/.f64 (.f64 1/139968000 (pow.f64 (PI.f64) 3)) x-scale) (fma.f64 1/699840000 (/.f64 (pow.f64 (PI.f64) 3) x-scale) (.f64 -1/194400 (.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 (PI.f64) -1/540) x-scale))))) (/.f64 180 (.f64 angle (*.f64 (PI.f64) x-scale)))))
(+.f64 (fma.f64 (pow.f64 angle 5) (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 5) x-scale) -1/158723712000000) (fma.f64 -1/194400 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 3) x-scale) 1/174960000) (.f64 -1/194400 (.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 (PI.f64) -1/540) x-scale))))) (.f64 (pow.f64 (PI.f64) 4) (.f64 1/125971200000 (/.f64 (.f64 (PI.f64) -1/540) x-scale))))) (.f64 angle (/.f64 (.f64 (PI.f64) -1/540) x-scale))) (fma.f64 (pow.f64 angle 3) (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 3) x-scale) 1/174960000) (.f64 -1/194400 (.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 (PI.f64) -1/540) x-scale)))) (/.f64 180 (.f64 angle (*.f64 (PI.f64) x-scale)))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(+.f64 0 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 y-scale x-scale))
(+.f64 (-.f64 0 (exp.f64 (log1p.f64 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))) 1)
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(+.f64 (.f64 y-scale 0) (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 y-scale x-scale))
(+.f64 (.f64 (.f64 y-scale -1) 0) (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 y-scale x-scale))
(+.f64 (.f64 (neg.f64 y-scale) 0) (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 y-scale x-scale))
(+.f64 (.f64 0 y-scale) (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 y-scale x-scale))
(+.f64 (.f64 0 (.f64 y-scale -1)) (.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 y-scale -1)))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(+.f64 (.f64 0 (neg.f64 y-scale)) (.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (neg.f64 y-scale)))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(-.f64 0 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(-.f64 (exp.f64 (log1p.f64 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))) 1)
(.f64 y-scale (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 y-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 1 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) y-scale))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (sqrt.f64 y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (sqrt.f64 y-scale)))
(.f64 (/.f64 (sqrt.f64 y-scale) (.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (/.f64 x-scale (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))))) (sqrt.f64 y-scale))
(.f64 (sqrt.f64 y-scale) (/.f64 (/.f64 (sqrt.f64 y-scale) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 x-scale (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(/.f64 (cbrt.f64 y-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 y-scale) 2)))
(.f64 (/.f64 (cbrt.f64 y-scale) (.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (/.f64 x-scale (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))))) (pow.f64 (cbrt.f64 y-scale) 2))
(.f64 (cbrt.f64 y-scale) (.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (cbrt.f64 y-scale)))
(.f64 (/.f64 (cbrt.f64 y-scale) (.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (/.f64 x-scale (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))))) (pow.f64 (cbrt.f64 y-scale) 2))
(.f64 (cbrt.f64 y-scale) (.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) y-scale))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (.f64 y-scale (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))) (neg.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) y-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(pow.f64 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 1)
(.f64 y-scale (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 y-scale x-scale))
(pow.f64 (sqrt.f64 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) 2)
(.f64 y-scale (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 y-scale x-scale))
(pow.f64 (cbrt.f64 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) 3)
(.f64 y-scale (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 y-scale x-scale))
(pow.f64 (pow.f64 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 3) 1/3)
(.f64 y-scale (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 y-scale x-scale))
(neg.f64 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 y-scale (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(sqrt.f64 (pow.f64 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 2))
(sqrt.f64 (pow.f64 (.f64 y-scale (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle))))) 2))
(fabs.f64 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 y-scale x-scale)))
(log.f64 (pow.f64 (exp.f64 y-scale) (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 y-scale x-scale))
(log.f64 (+.f64 1 (expm1.f64 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 y-scale x-scale))
(cbrt.f64 (pow.f64 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 3))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 y-scale x-scale))
(cbrt.f64 (.f64 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (pow.f64 y-scale 3)))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 y-scale x-scale))
(cbrt.f64 (.f64 (pow.f64 y-scale 3) (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 3)))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 y-scale x-scale))
(expm1.f64 (log1p.f64 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 y-scale x-scale))
(exp.f64 (log.f64 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 y-scale x-scale))
(exp.f64 (.f64 (log.f64 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 1))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 y-scale x-scale))
(log1p.f64 (expm1.f64 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) (/.f64 y-scale x-scale))
(+.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 0)
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(+.f64 0 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(+.f64 (-.f64 0 (exp.f64 (log1p.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) 1)
(/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (neg.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(-.f64 0 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (neg.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(-.f64 (exp.f64 (log1p.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 1)
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(-.f64 (+.f64 0 (exp.f64 (log1p.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) 1)
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (/.f64 1 x-scale) (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (/.f64 1 x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (/.f64 1 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (neg.f64 (/.f64 1 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (neg.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 1)
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) -1)
(/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (neg.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 1 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (sqrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sqrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (sqrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (neg.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (.f64 (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (/.f64 (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (cbrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 2))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (pow.f64 (cbrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2) (cbrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (pow.f64 (cbrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2) (neg.f64 (cbrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (neg.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 (pow.f64 (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) 2) (.f64 (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (/.f64 1 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (neg.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (/.f64 1 (neg.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 -1 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (neg.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)))
(/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (neg.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 (.f64 -1 (sqrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (sqrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (neg.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 (.f64 -1 (pow.f64 (cbrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2)) (cbrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (neg.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 (/.f64 1 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 1 (sqrt.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) (/.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) x-scale) (sqrt.f64 (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle)))))
(/.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (sqrt.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale)))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) 2)) (/.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (cbrt.f64 (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle)))) x-scale))
(/.f64 (/.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (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 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1) (/.f64 (/.f64 1 x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 1 x-scale))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (sqrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (neg.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 (neg.f64 (pow.f64 (cbrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2)) (cbrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (neg.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 (/.f64 1 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (/.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (/.f64 (/.f64 1 x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (/.f64 1 x-scale) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 1 (sqrt.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) (/.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) x-scale) (sqrt.f64 (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle)))))
(/.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (sqrt.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (/.f64 1 x-scale) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) 2)) (/.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (cbrt.f64 (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle)))) x-scale))
(/.f64 (/.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (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 (/.f64 (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (/.f64 (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) 2)) (/.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (cbrt.f64 (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle)))) x-scale))
(/.f64 (/.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (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 (/.f64 (pow.f64 (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) 2) 1) (/.f64 (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) 2) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 1 (sqrt.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) (/.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) x-scale) (sqrt.f64 (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle)))))
(/.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (sqrt.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) 2) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (cbrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (cbrt.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle))))) (/.f64 (pow.f64 (cbrt.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) x-scale)) 2) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) 2)))
(.f64 (cbrt.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (/.f64 (pow.f64 (cbrt.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale)) 2) (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)))
(.f64 (/.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) 2) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (/.f64 1 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) 2))) (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (/.f64 -1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (neg.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 (/.f64 -1 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) x-scale) (sqrt.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) (/.f64 -1 (sqrt.f64 (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle)))))
(/.f64 (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (/.f64 -1 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale)))
(/.f64 (.f64 -1 (/.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (cbrt.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) x-scale)) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))) 2))
(/.f64 (neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (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 (/.f64 -1 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (/.f64 1 x-scale))
(/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (neg.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 (/.f64 -1 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1)) (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (neg.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 (/.f64 -1 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)))) (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)))
(/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (neg.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 (/.f64 -1 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) 2))) (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)))
(/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (neg.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 (/.f64 (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (/.f64 (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 1) (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (/.f64 (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 x-scale)) (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (sqrt.f64 x-scale)))
(.f64 (/.f64 1 (.f64 (sqrt.f64 x-scale) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (sqrt.f64 x-scale)))
(/.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 x-scale))) (sqrt.f64 x-scale))
(.f64 (/.f64 (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (cbrt.f64 x-scale)))
(.f64 (/.f64 1 (.f64 (pow.f64 (cbrt.f64 x-scale) 2) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (cbrt.f64 x-scale)))
(/.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (pow.f64 (cbrt.f64 x-scale) 2))) (cbrt.f64 x-scale))
(.f64 (/.f64 (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (neg.f64 x-scale)) (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (/.f64 (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale 1)) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (/.f64 (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (/.f64 (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (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 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (/.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) 2)) (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) x-scale)))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))))
(.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (neg.f64 x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1) x-scale))
(.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (/.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) 2)) (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) x-scale)))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))))
(.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (neg.f64 x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (/.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) 2)) (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) x-scale)))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))))
(.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (neg.f64 x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) 1) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (/.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) 2)) (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) x-scale)))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))))
(.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (neg.f64 x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 x-scale (/.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (/.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) 2)) (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) x-scale)))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))))
(.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (neg.f64 x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))))
(.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (/.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) 2)) (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) x-scale)))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))))
(.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (neg.f64 x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 x-scale (/.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (/.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) 2)) (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) x-scale)))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))))
(.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (neg.f64 x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (pow.f64 (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) 2)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))))
(.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (/.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) 2)) (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) x-scale)))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))))
(.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (neg.f64 x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(/.f64 (.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) 2)) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale))
(neg.f64 (.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) 2) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (neg.f64 x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))))
(+.f64 0 (/.f64 (.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) 2) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale)))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))) (neg.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (/.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) 2)) (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) x-scale)))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))))
(.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (neg.f64 x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) -1) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) 2)) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale))
(neg.f64 (.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) 2) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (neg.f64 x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))))
(+.f64 0 (/.f64 (.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) 2) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale)))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) -1) (neg.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (/.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) 2)) (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) x-scale)))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))))
(.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (neg.f64 x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (/.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) 2)) (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) x-scale)))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))))
(.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (neg.f64 x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) 2)) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale))
(neg.f64 (.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) 2) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (neg.f64 x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))))
(+.f64 0 (/.f64 (.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) 2) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale)))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 x-scale)))
(.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (/.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) 2)) (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) x-scale)))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))))
(.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (neg.f64 x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (/.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) 2)) (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) x-scale)))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))))
(.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (neg.f64 x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 -1 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)))) (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) 2)) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale))
(neg.f64 (.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) 2) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (neg.f64 x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))))
(+.f64 0 (/.f64 (.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) 2) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale)))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) x-scale)
(.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (/.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) 2)) (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) x-scale)))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))))
(.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (neg.f64 x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (neg.f64 x-scale))
(.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (/.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) 2)) (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) x-scale)))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))))
(.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (neg.f64 x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) 2)) (sqrt.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sqrt.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))))
(/.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) 2)) (/.f64 (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale) (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (sqrt.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) (.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) 2)) (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale)) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))) 2)))
(.f64 (.f64 x-scale (/.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) 2)) (neg.f64 (cos.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)))))))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) x-scale)
(.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (/.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) 2)) (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) x-scale)))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))))
(.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (neg.f64 x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (sqrt.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) (/.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) 2)) (/.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) x-scale) (sqrt.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle))))))
(.f64 (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) 2)) (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sqrt.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) x-scale))) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) (.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) 2)) (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) (.f64 x-scale (pow.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) 2))))
(.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) 2)) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 x-scale (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2))))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (neg.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)))) (neg.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) 2)) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale))
(neg.f64 (.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) 2) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (neg.f64 x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))))
(+.f64 0 (/.f64 (.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) 2) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale)))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (neg.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)))) (neg.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (/.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) 2)) (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) x-scale)))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))))
(.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (neg.f64 x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3))) (+.f64 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2) 0))
(.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) 2) (/.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) 2)) (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) 3))))
(/.f64 (.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) 3)) (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) 3)))
(.f64 (/.f64 (-.f64 0 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 1)) (.f64 (neg.f64 x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (/.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) 2)) (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) x-scale)))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))))
(.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (neg.f64 x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))) 2))
(pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 1)
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(pow.f64 (sqrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2)
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(pow.f64 (cbrt.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 3)
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(pow.f64 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3) 1/3)
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) -1)
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (neg.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(sqrt.f64 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))
(sqrt.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle)))) 2))
(fabs.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(log.f64 (exp.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(log.f64 (+.f64 1 (expm1.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(cbrt.f64 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(cbrt.f64 (/.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) 3) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(expm1.f64 (log1p.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(exp.f64 (log.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(exp.f64 (.f64 (log.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 1))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(log1p.f64 (expm1.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))
(/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))

localize235.0ms (0.2%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
	85.8%	(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))
	61.6%	(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
	61.4%	(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
✓	45.0%	(/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 1 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))

Compiler

Compiled 545 to 312 computations (42.8% saved)

series15.0ms (0%)

Counts

1 → 36

Calls

9 calls:

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

rewrite126.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

584×	`add-sqr-sqrt`
572×	`*-un-lft-identity`
568×	`pow1`
536×	`add-exp-log`
536×	`add-cbrt-cube`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	29	161
1	596	151
2	7649	151

Stop Event

1×	node limit

Counts

1 → 45

Calls

Call 1

Inputs

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

Outputs

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

simplify189.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

878×	`+-commutative`
820×	`associate-+l+`
804×	`associate-/r/`
674×	`associate-+r+`
604×	`associate-r`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	412	20131
1	1354	18689
2	6069	18689

Stop Event

1×	node limit

Counts

81 → 127

Calls

Call 1

Inputs
(.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(+.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (.f64 (pow.f64 b 4) (-.f64 (.f64 -1 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 2)) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (.f64 (pow.f64 b 4) (-.f64 (.f64 -1 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 6) (-.f64 (.f64 -1 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 4)) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(-.f64 (+.f64 (/.f64 1 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1)) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(-.f64 (+.f64 (/.f64 1 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)) (pow.f64 b 4))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1)) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(-.f64 (+.f64 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 4)) (pow.f64 b 6)) (+.f64 (/.f64 1 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)) (pow.f64 b 4)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1)) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(-.f64 (+.f64 (/.f64 1 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1)) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(-.f64 (+.f64 (/.f64 1 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)) (pow.f64 b 4))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1)) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(-.f64 (+.f64 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 4)) (pow.f64 b 6)) (+.f64 (/.f64 1 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)) (pow.f64 b 4)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1)) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(.f64 360 (/.f64 (pow.f64 b 2) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))
(+.f64 (.f64 angle (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (.f64 360 (/.f64 (pow.f64 b 2) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))
(+.f64 (.f64 angle (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 -1/1574640000 (.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) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2))))))) (.f64 360 (/.f64 (pow.f64 b 2) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))
(+.f64 (.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6))))) (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 180 (/.f64 (.f64 (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))))) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/1469328076800000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7))) (+.f64 (.f64 -1/30855889612800000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7))) (+.f64 (.f64 -1/881596846080000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7))) (.f64 -1/4407984230400000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7)))))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))) (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 -1/1574640000 (.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) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))) (+.f64 (.f64 angle (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 -1/1574640000 (.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) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2))))))) (.f64 360 (/.f64 (pow.f64 b 2) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))))
(/.f64 (+.f64 (.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 b 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(/.f64 (+.f64 (.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 b 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(/.f64 (+.f64 (.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 b 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(/.f64 (+.f64 (.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 b 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 b 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.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)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 b 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.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)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 b 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.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)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 b 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.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 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (/.f64 1 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)))) (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 b 2)) (.f64 (pow.f64 b 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 2)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(+.f64 (/.f64 1 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 4) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 4)) (pow.f64 b 2)) (+.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)))) (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 b 2)) (.f64 (pow.f64 b 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 2)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (/.f64 1 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 4) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 4)) (pow.f64 b 2)) (+.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)))) (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 b 2)) (.f64 (pow.f64 b 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 2)) (+.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)))) (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 b 2)) (.f64 (pow.f64 b 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 6)) (pow.f64 b 4))))))
(.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(-.f64 (+.f64 (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(-.f64 (+.f64 (/.f64 (.f64 (-.f64 (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2)) (pow.f64 a 4)) (+.f64 (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(-.f64 (+.f64 (/.f64 (.f64 (-.f64 (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2)) (pow.f64 a 4)) (+.f64 (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (-.f64 (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 4)) (pow.f64 a 6))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(-.f64 (+.f64 (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(-.f64 (+.f64 (/.f64 (.f64 (-.f64 (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2)) (pow.f64 a 4)) (+.f64 (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(-.f64 (+.f64 (/.f64 (.f64 (-.f64 (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2)) (pow.f64 a 4)) (+.f64 (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (-.f64 (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 4)) (pow.f64 a 6))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(-.f64 (exp.f64 (log1p.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a))))))) 1)
(.f64 1 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (*.f64 a (neg.f64 a))))))
(.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 1 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (*.f64 a (neg.f64 a))))))
(.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (*.f64 a (neg.f64 a))))) 1)
(.f64 (sqrt.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a)))))) (sqrt.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (*.f64 a (neg.f64 a)))))))
(.f64 (sqrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (sqrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 1 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (*.f64 a (neg.f64 a)))))))
(.f64 (cbrt.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a)))))) (pow.f64 (cbrt.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (*.f64 a (neg.f64 a)))))) 2))
(.f64 (pow.f64 (cbrt.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a)))))) 2) (cbrt.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (*.f64 a (neg.f64 a)))))))
(.f64 (pow.f64 (cbrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) 2) (.f64 (cbrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 1 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (*.f64 a (neg.f64 a)))))))
(.f64 (.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle))))) 2) (/.f64 1 (fma.f64 b b (.f64 a (neg.f64 a)))))
(.f64 (/.f64 1 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a))))) (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2)))
(.f64 (neg.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 1 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (neg.f64 (fma.f64 b b (*.f64 a (neg.f64 a)))))))
(.f64 (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (fma.f64 b b (.f64 a (neg.f64 a))))))
(.f64 (/.f64 1 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2)) (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (fma.f64 b b (.f64 a (neg.f64 a)))))
(.f64 (/.f64 1 (fma.f64 b b (.f64 a (neg.f64 a)))) (.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle))))) 2))
(.f64 (/.f64 1 (sqrt.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a)))))) (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (sqrt.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a)))))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a))))) 2)) (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (cbrt.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a)))))))
(.f64 (/.f64 (.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle))))) 2) (-.f64 (pow.f64 b 4) (pow.f64 a 4))) (fma.f64 b b (.f64 a a)))
(.f64 (/.f64 (.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle))))) 2) (-.f64 (pow.f64 b 6) (pow.f64 a 6))) (+.f64 (pow.f64 (.f64 b a) 2) (+.f64 (pow.f64 b 4) (pow.f64 a 4))))
(.f64 (/.f64 (sqrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (sqrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (fma.f64 b b (*.f64 a (neg.f64 a))))))
(.f64 (/.f64 (sqrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) 1) (/.f64 (sqrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a))))))
(.f64 (/.f64 (sqrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2)) (/.f64 (sqrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (fma.f64 b b (*.f64 a (neg.f64 a)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) 2) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cbrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (fma.f64 b b (*.f64 a (neg.f64 a))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) 2) 1) (/.f64 (cbrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a))))))
(.f64 (/.f64 (sqrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (fma.f64 b b (.f64 a (neg.f64 a)))) (/.f64 (sqrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2)))
(.f64 (/.f64 (sqrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (pow.f64 (cbrt.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a))))) 2)) (/.f64 (sqrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (cbrt.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (*.f64 a (neg.f64 a)))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) 2) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2)) (/.f64 (cbrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (fma.f64 b b (*.f64 a (neg.f64 a)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) 2) (fma.f64 b b (.f64 a (neg.f64 a)))) (/.f64 (cbrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2)))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) 2) (sqrt.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a)))))) (/.f64 (cbrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (sqrt.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (*.f64 a (neg.f64 a)))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) 2) (pow.f64 (cbrt.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a))))) 2)) (cbrt.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (*.f64 a (neg.f64 a)))))))
(pow.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a))))) 1)
(pow.f64 (sqrt.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a)))))) 2)
(pow.f64 (cbrt.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a)))))) 3)
(pow.f64 (pow.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a))))) 3) 1/3)
(pow.f64 (/.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (fma.f64 b b (*.f64 a (neg.f64 a))))) -1)
(neg.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (neg.f64 (fma.f64 b b (.f64 a (neg.f64 a)))))))
(sqrt.f64 (pow.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a))))) 2))
(log.f64 (exp.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a)))))))
(log.f64 (+.f64 1 (expm1.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a))))))))
(cbrt.f64 (pow.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a))))) 3))
(cbrt.f64 (/.f64 (pow.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) 3) (pow.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a)))) 3)))
(expm1.f64 (log1p.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a)))))))
(exp.f64 (log.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a)))))))
(exp.f64 (.f64 (log.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (*.f64 a (neg.f64 a)))))) 1))
(log1p.f64 (expm1.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a)))))))

Outputs
(.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(+.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(fma.f64 (.f64 b b) (+.f64 (neg.f64 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a))))) (.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(fma.f64 (.f64 b b) (fma.f64 -1 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)))) (.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a))))) (.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(+.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (.f64 (pow.f64 b 4) (-.f64 (.f64 -1 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 2)) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(fma.f64 (.f64 b b) (+.f64 (neg.f64 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a))))) (+.f64 (.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (pow.f64 b 4) (/.f64 (.f64 a a) (+.f64 (neg.f64 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (*.f64 a a)))))))))
(fma.f64 (.f64 b b) (fma.f64 -1 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)))) (.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a))))) (fma.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 (pow.f64 b 4) (.f64 a a)) (fma.f64 -1 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)))) (.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (*.f64 a a))))))))
(+.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 -1 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (.f64 (pow.f64 b 4) (-.f64 (.f64 -1 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 2)) (+.f64 (/.f64 (.f64 (pow.f64 b 6) (-.f64 (.f64 -1 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 4)) (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 (.f64 b b) (+.f64 (neg.f64 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a))))) (+.f64 (/.f64 (pow.f64 b 4) (/.f64 (.f64 a a) (+.f64 (neg.f64 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a))))))) (+.f64 (.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (pow.f64 b 6) (/.f64 (pow.f64 a 4) (+.f64 (neg.f64 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (*.f64 a a))))))))))
(+.f64 (fma.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 (pow.f64 b 6) (pow.f64 a 4)) (fma.f64 -1 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)))) (.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a))))))) (fma.f64 (.f64 b b) (fma.f64 -1 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)))) (.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a))))) (.f64 (/.f64 (pow.f64 b 4) (.f64 a a)) (fma.f64 -1 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)))) (.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a))))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1) (.f64 (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 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(-.f64 (+.f64 (/.f64 1 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1)) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (/.f64 1 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (-.f64 (fma.f64 2 (.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))))
(+.f64 (fma.f64 2 (/.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (/.f64 b a) (/.f64 b a))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (+.f64 (/.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 (.f64 a a) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))) (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(+.f64 (fma.f64 2 (/.f64 (.f64 (.f64 (/.f64 a b) (/.f64 a b)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (+.f64 (/.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 (.f64 a a) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))) (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(-.f64 (+.f64 (/.f64 1 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)) (pow.f64 b 4))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1)) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (/.f64 1 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (-.f64 (+.f64 (fma.f64 2 (.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (-.f64 (.f64 2 (/.f64 (.f64 a a) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (neg.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1))))) (/.f64 (pow.f64 b 4) (.f64 a a)))) (neg.f64 (.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))))
(+.f64 (+.f64 (fma.f64 2 (/.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (/.f64 b a) (/.f64 b a))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (/.f64 (fma.f64 2 (.f64 (/.f64 a (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 a a) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (pow.f64 b 4)) (.f64 a a))) (+.f64 (/.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 (.f64 a a) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))) (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(+.f64 (+.f64 (/.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (fma.f64 2 (/.f64 (.f64 (.f64 (/.f64 a b) (/.f64 a b)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (+.f64 (.f64 (/.f64 (.f64 a a) (pow.f64 b 4)) (fma.f64 2 (.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a)) (.f64 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 a a)))) (.f64 (/.f64 (.f64 a a) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))) (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(-.f64 (+.f64 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 4)) (pow.f64 b 6)) (+.f64 (/.f64 1 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)) (pow.f64 b 4)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1)) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (/.f64 (-.f64 (.f64 2 (/.f64 (.f64 a a) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (neg.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1))))) (/.f64 (pow.f64 b 6) (pow.f64 a 4))) (+.f64 (/.f64 1 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (-.f64 (+.f64 (fma.f64 2 (.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (-.f64 (.f64 2 (/.f64 (.f64 a a) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (neg.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1))))) (/.f64 (pow.f64 b 4) (.f64 a a)))) (neg.f64 (.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))))))
(+.f64 (+.f64 (/.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (+.f64 (fma.f64 2 (/.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (/.f64 b a) (/.f64 b a))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (/.f64 (fma.f64 2 (.f64 (/.f64 a (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 a a) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (pow.f64 b 4)) (.f64 a a)))) (+.f64 (/.f64 (fma.f64 2 (.f64 (/.f64 a (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 a a) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (pow.f64 b 6) (pow.f64 a 4))) (.f64 (/.f64 (.f64 a a) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))) (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(+.f64 (/.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (+.f64 (.f64 (/.f64 (pow.f64 a 4) (pow.f64 b 6)) (fma.f64 2 (.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a)) (.f64 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 a a)))) (+.f64 (fma.f64 2 (/.f64 (.f64 (.f64 (/.f64 a b) (/.f64 a b)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (+.f64 (.f64 (/.f64 (.f64 a a) (pow.f64 b 4)) (fma.f64 2 (.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a)) (.f64 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 a a)))) (.f64 (/.f64 (.f64 a a) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))) (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1) (.f64 (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 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(-.f64 (+.f64 (/.f64 1 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1)) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (/.f64 1 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (-.f64 (fma.f64 2 (.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))))
(+.f64 (fma.f64 2 (/.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (/.f64 b a) (/.f64 b a))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (+.f64 (/.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 (.f64 a a) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))) (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(+.f64 (fma.f64 2 (/.f64 (.f64 (.f64 (/.f64 a b) (/.f64 a b)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (+.f64 (/.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 (.f64 a a) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))) (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(-.f64 (+.f64 (/.f64 1 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)) (pow.f64 b 4))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1)) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (/.f64 1 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (-.f64 (+.f64 (fma.f64 2 (.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (-.f64 (.f64 2 (/.f64 (.f64 a a) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (neg.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1))))) (/.f64 (pow.f64 b 4) (.f64 a a)))) (neg.f64 (.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))))
(+.f64 (+.f64 (fma.f64 2 (/.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (/.f64 b a) (/.f64 b a))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (/.f64 (fma.f64 2 (.f64 (/.f64 a (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 a a) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (pow.f64 b 4)) (.f64 a a))) (+.f64 (/.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 (.f64 a a) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))) (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(+.f64 (+.f64 (/.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (fma.f64 2 (/.f64 (.f64 (.f64 (/.f64 a b) (/.f64 a b)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (+.f64 (.f64 (/.f64 (.f64 a a) (pow.f64 b 4)) (fma.f64 2 (.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a)) (.f64 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 a a)))) (.f64 (/.f64 (.f64 a a) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))) (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(-.f64 (+.f64 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 4)) (pow.f64 b 6)) (+.f64 (/.f64 1 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (pow.f64 a 2)) (pow.f64 b 4)))))) (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1)) (.f64 (pow.f64 b 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (/.f64 (-.f64 (.f64 2 (/.f64 (.f64 a a) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (neg.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1))))) (/.f64 (pow.f64 b 6) (pow.f64 a 4))) (+.f64 (/.f64 1 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (-.f64 (+.f64 (fma.f64 2 (.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (-.f64 (.f64 2 (/.f64 (.f64 a a) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (neg.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1))))) (/.f64 (pow.f64 b 4) (.f64 a a)))) (neg.f64 (.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))))))
(+.f64 (+.f64 (/.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (+.f64 (fma.f64 2 (/.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (/.f64 b a) (/.f64 b a))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (/.f64 (fma.f64 2 (.f64 (/.f64 a (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 a a) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (pow.f64 b 4)) (.f64 a a)))) (+.f64 (/.f64 (fma.f64 2 (.f64 (/.f64 a (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 a a) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (pow.f64 b 6) (pow.f64 a 4))) (.f64 (/.f64 (.f64 a a) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))) (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(+.f64 (/.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (+.f64 (.f64 (/.f64 (pow.f64 a 4) (pow.f64 b 6)) (fma.f64 2 (.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a)) (.f64 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 a a)))) (+.f64 (fma.f64 2 (/.f64 (.f64 (.f64 (/.f64 a b) (/.f64 a b)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (+.f64 (.f64 (/.f64 (.f64 a a) (pow.f64 b 4)) (fma.f64 2 (.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 a a)) (.f64 (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 a a)))) (.f64 (/.f64 (.f64 a a) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))) (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))))
(.f64 360 (/.f64 (pow.f64 b 2) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))
(.f64 360 (/.f64 (/.f64 (.f64 b b) angle) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))
(.f64 360 (/.f64 (/.f64 b (/.f64 angle b)) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))
(+.f64 (.f64 angle (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (.f64 360 (/.f64 (pow.f64 b 2) (.f64 angle (*.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))
(fma.f64 angle (+.f64 (/.f64 (.f64 180 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 -1/32400 (.f64 b b)) (pow.f64 (PI.f64) 2)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 -64800 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 b b) (pow.f64 (PI.f64) 2))))) (.f64 360 (/.f64 (/.f64 (.f64 b b) angle) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))
(fma.f64 angle (fma.f64 180 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 -1/32400 b) b))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) -64800)) (.f64 360 (/.f64 (/.f64 b (/.f64 angle b)) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))
(+.f64 (.f64 angle (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 -1/1574640000 (.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) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2))))))) (.f64 360 (/.f64 (pow.f64 b 2) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))
(fma.f64 angle (+.f64 (/.f64 (.f64 180 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 -1/32400 (.f64 b b)) (pow.f64 (PI.f64) 2)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 -64800 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 b b) (pow.f64 (PI.f64) 2))))) (fma.f64 (pow.f64 angle 3) (-.f64 (/.f64 (.f64 180 (fma.f64 -1/1574640000 (.f64 (.f64 a a) (pow.f64 (PI.f64) 4)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 180 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (/.f64 (.f64 180 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 -1/32400 (.f64 b b)) (pow.f64 (PI.f64) 2)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 -64800 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 b b) (pow.f64 (PI.f64) 2))))) (PI.f64))) (.f64 64800 (/.f64 (fma.f64 1/2267481600000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/3779136000000)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 b b)))))) (.f64 360 (/.f64 (/.f64 (.f64 b b) angle) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))
(fma.f64 angle (fma.f64 180 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 -1/32400 b) b))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) -64800)) (fma.f64 (pow.f64 angle 3) (+.f64 (.f64 180 (-.f64 (/.f64 (fma.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 4) -1/1574640000))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 180 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 -1/32400 b) b))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) -64800))))) (.f64 -64800 (.f64 (/.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/1417176000000)))) (.f64 360 (/.f64 (/.f64 b (/.f64 angle b)) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))
(+.f64 (.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6))))) (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 180 (/.f64 (.f64 (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))))) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/1469328076800000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7))) (+.f64 (.f64 -1/30855889612800000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7))) (+.f64 (.f64 -1/881596846080000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7))) (.f64 -1/4407984230400000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 7)))))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))) (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 -1/1574640000 (.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) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5)))))) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2))))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))))))) (+.f64 (.f64 angle (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (+.f64 (.f64 (pow.f64 angle 3) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 -1/1574640000 (.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) (pow.f64 a 2)) (PI.f64)))) (+.f64 (.f64 180 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 180 (/.f64 (+.f64 (.f64 1/16200 (.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 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 -1/34992000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3))) (.f64 -1/11664000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 3)))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)))))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64)))) (.f64 64800 (/.f64 (.f64 (+.f64 (.f64 1/2267481600000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (+.f64 (.f64 1/22674816000000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))) (.f64 1/4534963200000 (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (pow.f64 (PI.f64) 5))))) (pow.f64 b 2)) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2))))))) (.f64 360 (/.f64 (pow.f64 b 2) (.f64 angle (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (PI.f64))))))))
(fma.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (/.f64 (fma.f64 2 (.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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 180 (.f64 (/.f64 (fma.f64 1/2267481600000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/3779136000000)) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (/.f64 (.f64 180 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 -1/32400 (.f64 b b)) (pow.f64 (PI.f64) 2)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 -64800 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 b b) (pow.f64 (PI.f64) 2))))) (PI.f64))) (fma.f64 64800 (/.f64 (fma.f64 -1/1469328076800000000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 7)) (fma.f64 -1/30855889612800000000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 7)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 7)) -1/734664038400000000))) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 b b))) (/.f64 (.f64 180 (.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (-.f64 (/.f64 (.f64 180 (fma.f64 -1/1574640000 (.f64 (.f64 a a) (pow.f64 (PI.f64) 4)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 180 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (/.f64 (.f64 180 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 -1/32400 (.f64 b b)) (pow.f64 (PI.f64) 2)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 -64800 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 b b) (pow.f64 (PI.f64) 2))))) (PI.f64))) (.f64 64800 (/.f64 (.f64 b b) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (fma.f64 1/22674816000000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/1511654400000))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 angle (+.f64 (/.f64 (.f64 180 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 -1/32400 (.f64 b b)) (pow.f64 (PI.f64) 2)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 -64800 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 b b) (pow.f64 (PI.f64) 2))))) (fma.f64 (pow.f64 angle 3) (-.f64 (/.f64 (.f64 180 (fma.f64 -1/1574640000 (.f64 (.f64 a a) (pow.f64 (PI.f64) 4)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 180 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (/.f64 (.f64 180 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 -1/32400 (.f64 b b)) (pow.f64 (PI.f64) 2)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 -64800 (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 3)) -1/8748000) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 b b) (pow.f64 (PI.f64) 2))))) (PI.f64))) (.f64 64800 (/.f64 (fma.f64 1/2267481600000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/3779136000000)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 b b)))))) (.f64 360 (/.f64 (/.f64 (.f64 b b) angle) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
(fma.f64 (pow.f64 angle 5) (-.f64 (.f64 180 (-.f64 (/.f64 (fma.f64 2 (.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 6)) 1/765275040000000) (.f64 b (.f64 b (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/1417176000000) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 180 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 -1/32400 b) b))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) -64800))))) (fma.f64 180 (.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (.f64 180 (-.f64 (/.f64 (fma.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 4) -1/1574640000))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 180 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 -1/32400 b) b))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) -64800))))) (.f64 -64800 (.f64 (/.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/1417176000000))))) (.f64 64800 (.f64 (/.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) (/.f64 (fma.f64 -1/1469328076800000000 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 7)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 7)) -43/30855889612800000000)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (fma.f64 angle (fma.f64 180 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 -1/32400 b) b))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) -64800)) (fma.f64 (pow.f64 angle 3) (+.f64 (.f64 180 (-.f64 (/.f64 (fma.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 4) -1/1574640000))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 180 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 -1/32400 b) b))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) -64800))))) (.f64 -64800 (.f64 (/.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 5)) 1/1417176000000)))) (.f64 360 (/.f64 (/.f64 b (/.f64 angle b)) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
(/.f64 (+.f64 (.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 b 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(/.f64 (fma.f64 2 (.f64 (.f64 a a) (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 b b))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))
(/.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a)))))
(/.f64 (+.f64 (.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 b 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(/.f64 (fma.f64 2 (.f64 (.f64 a a) (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 b b))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))
(/.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a)))))
(/.f64 (+.f64 (.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 b 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(/.f64 (fma.f64 2 (.f64 (.f64 a a) (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 b b))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))
(/.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a)))))
(/.f64 (+.f64 (.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 b 2))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(/.f64 (fma.f64 2 (.f64 (.f64 a a) (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 b b))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))
(/.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a)))))
(/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 b 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(/.f64 (fma.f64 2 (.f64 (.f64 a a) (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 b b))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))
(/.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a)))))
(/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 b 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(/.f64 (fma.f64 2 (.f64 (.f64 a a) (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 b b))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))
(/.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a)))))
(/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 b 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(/.f64 (fma.f64 2 (.f64 (.f64 a a) (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 b b))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))
(/.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a)))))
(/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 b 2))) (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(/.f64 (fma.f64 2 (.f64 (.f64 a a) (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 b b))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))
(/.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a)))))
(/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 b b)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))))
(+.f64 (/.f64 1 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)))) (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 b 2)) (.f64 (pow.f64 b 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 2)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(+.f64 (/.f64 1 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (fma.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)))) (neg.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 b b)) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 b 4))))) (.f64 a a) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(+.f64 (/.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (fma.f64 (.f64 a a) (fma.f64 2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))) (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 b 4))))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(+.f64 (/.f64 1 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 4) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 4)) (pow.f64 b 2)) (+.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)))) (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 b 2)) (.f64 (pow.f64 b 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 2)) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (/.f64 1 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (+.f64 (fma.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)))) (neg.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 b b)) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 b 4))))) (.f64 a a) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)))) (neg.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 b b)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 b 4)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (/.f64 (*.f64 b b) (pow.f64 a 4)))))
(+.f64 (+.f64 (/.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (fma.f64 (.f64 a a) (fma.f64 2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))) (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 b 4))))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 (/.f64 (pow.f64 a 4) b) (/.f64 (fma.f64 2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))) (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 b 4))))) b)))
(+.f64 (+.f64 (/.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (fma.f64 (.f64 a a) (fma.f64 2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))) (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 b 4))))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 (/.f64 (pow.f64 a 4) (.f64 b b)) (fma.f64 2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))) (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (pow.f64 b 4)))))))
(+.f64 (/.f64 1 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 b 4) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 4)) (pow.f64 b 2)) (+.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)))) (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 b 2)) (.f64 (pow.f64 b 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 2)) (+.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 b 2)))) (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 b 2)) (.f64 (pow.f64 b 4) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (pow.f64 a 6)) (pow.f64 b 4))))))
(+.f64 (/.f64 1 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (+.f64 (/.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)))) (neg.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 b b)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 b 4)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (/.f64 (.f64 b b) (pow.f64 a 4))) (+.f64 (fma.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)))) (neg.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 b b)) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 b 4))))) (.f64 a a) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (-.f64 (.f64 2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b)))) (neg.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 b b)) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 b 4))))) (/.f64 (pow.f64 b 4) (pow.f64 a 6))))))
(+.f64 (/.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (+.f64 (fma.f64 (.f64 a a) (fma.f64 2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))) (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 b 4))))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (+.f64 (.f64 (/.f64 (fma.f64 2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))) (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 b 4))))) (pow.f64 b 4)) (pow.f64 a 6)) (.f64 (/.f64 (pow.f64 a 4) b) (/.f64 (fma.f64 2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))) (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 b 4))))) b)))))
(+.f64 (/.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (+.f64 (fma.f64 (.f64 a a) (fma.f64 2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))) (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 b 4))))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (+.f64 (.f64 (/.f64 (pow.f64 a 4) (.f64 b b)) (fma.f64 2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))) (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 b 4)))))) (.f64 (/.f64 (pow.f64 a 6) (pow.f64 b 4)) (fma.f64 2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b b))) (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (pow.f64 b 4)))))))))
(.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(-.f64 (+.f64 (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (fma.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (neg.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 b b)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 -2 (.f64 (/.f64 (.f64 b b) (.f64 a a)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(fma.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (fma.f64 -1 (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)))) (.f64 (.f64 -2 (.f64 (/.f64 b a) (/.f64 b a))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(-.f64 (+.f64 (/.f64 (.f64 (-.f64 (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2)) (pow.f64 a 4)) (+.f64 (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 (neg.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 b b)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))) (pow.f64 a 4)) (+.f64 (fma.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (neg.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 b b)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 -2 (.f64 (/.f64 (.f64 b b) (.f64 a a)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))
(+.f64 (fma.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (fma.f64 -1 (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)))) (.f64 (.f64 -2 (.f64 (/.f64 b a) (/.f64 b a))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 (/.f64 (fma.f64 -1 (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (.f64 -2 (.f64 b b)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (pow.f64 a 4)) (*.f64 b b)))
(+.f64 (fma.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (fma.f64 -1 (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)))) (.f64 (.f64 -2 (.f64 (/.f64 b a) (/.f64 b a))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 (.f64 (/.f64 b (pow.f64 a 4)) b) (fma.f64 -1 (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (/.f64 (.f64 -2 (.f64 b b)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(-.f64 (+.f64 (/.f64 (.f64 (-.f64 (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2)) (pow.f64 a 4)) (+.f64 (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (-.f64 (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 4)) (pow.f64 a 6))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 (neg.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 b b)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))) (pow.f64 a 4)) (-.f64 (fma.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (fma.f64 -1 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 b b)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (+.f64 (neg.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 b b)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (/.f64 (pow.f64 a 6) (pow.f64 b 4))))) (.f64 2 (.f64 (/.f64 (.f64 b b) (.f64 a a)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))))
(+.f64 (fma.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (/.f64 (fma.f64 -1 (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (.f64 -2 (.f64 b b)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (pow.f64 a 6) (pow.f64 b 4))) (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)))))) (+.f64 (.f64 (/.f64 (fma.f64 -1 (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (.f64 -2 (.f64 b b)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (pow.f64 a 4)) (.f64 b b)) (.f64 (.f64 -2 (.f64 (/.f64 b a) (/.f64 b a))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(+.f64 (fma.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 (/.f64 (pow.f64 b 4) (pow.f64 a 6)) (fma.f64 -1 (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (/.f64 (.f64 -2 (.f64 b b)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)))))) (+.f64 (.f64 (.f64 (/.f64 b (pow.f64 a 4)) b) (fma.f64 -1 (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (/.f64 (.f64 -2 (.f64 b b)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 (.f64 -2 (.f64 (/.f64 b a) (/.f64 b a))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(-.f64 (+.f64 (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (fma.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (neg.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 b b)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 -2 (.f64 (/.f64 (.f64 b b) (.f64 a a)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(fma.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (fma.f64 -1 (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)))) (.f64 (.f64 -2 (.f64 (/.f64 b a) (/.f64 b a))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(-.f64 (+.f64 (/.f64 (.f64 (-.f64 (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2)) (pow.f64 a 4)) (+.f64 (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 (neg.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 b b)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))) (pow.f64 a 4)) (+.f64 (fma.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (neg.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 b b)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 -2 (.f64 (/.f64 (.f64 b b) (.f64 a a)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))
(+.f64 (fma.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (fma.f64 -1 (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)))) (.f64 (.f64 -2 (.f64 (/.f64 b a) (/.f64 b a))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 (/.f64 (fma.f64 -1 (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (.f64 -2 (.f64 b b)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (pow.f64 a 4)) (*.f64 b b)))
(+.f64 (fma.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (fma.f64 -1 (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)))) (.f64 (.f64 -2 (.f64 (/.f64 b a) (/.f64 b a))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 (.f64 (/.f64 b (pow.f64 a 4)) b) (fma.f64 -1 (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (/.f64 (.f64 -2 (.f64 b b)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(-.f64 (+.f64 (/.f64 (.f64 (-.f64 (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 2)) (pow.f64 a 4)) (+.f64 (.f64 -2 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (-.f64 (.f64 -1 (/.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 b 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (pow.f64 b 4)) (pow.f64 a 6))))) (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 a 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 (neg.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 b b)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))) (pow.f64 a 4)) (-.f64 (fma.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (fma.f64 -1 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 b b)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (+.f64 (neg.f64 (/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 b b)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 -2 (/.f64 (.f64 b b) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (/.f64 (pow.f64 a 6) (pow.f64 b 4))))) (.f64 2 (.f64 (/.f64 (.f64 b b) (.f64 a a)) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))))
(+.f64 (fma.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (/.f64 (fma.f64 -1 (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (.f64 -2 (.f64 b b)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (pow.f64 a 6) (pow.f64 b 4))) (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)))))) (+.f64 (.f64 (/.f64 (fma.f64 -1 (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (.f64 -2 (.f64 b b)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (pow.f64 a 4)) (.f64 b b)) (.f64 (.f64 -2 (.f64 (/.f64 b a) (/.f64 b a))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(+.f64 (fma.f64 -2 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 (/.f64 (pow.f64 b 4) (pow.f64 a 6)) (fma.f64 -1 (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (/.f64 (.f64 -2 (.f64 b b)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 a a)))))) (+.f64 (.f64 (.f64 (/.f64 b (pow.f64 a 4)) b) (fma.f64 -1 (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (/.f64 (.f64 -2 (.f64 b b)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 (.f64 -2 (.f64 (/.f64 b a) (/.f64 b a))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(-.f64 (exp.f64 (log1p.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a))))))) 1)
(/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))
(.f64 1 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (*.f64 a (neg.f64 a))))))
(/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))
(.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 1 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (*.f64 a (neg.f64 a))))))
(/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))
(.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (*.f64 a (neg.f64 a))))) 1)
(/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))
(.f64 (sqrt.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a)))))) (sqrt.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (*.f64 a (neg.f64 a)))))))
(/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))
(.f64 (sqrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (sqrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 1 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (*.f64 a (neg.f64 a)))))))
(/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))
(.f64 (cbrt.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a)))))) (pow.f64 (cbrt.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (*.f64 a (neg.f64 a)))))) 2))
(/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))
(.f64 (pow.f64 (cbrt.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a)))))) 2) (cbrt.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (*.f64 a (neg.f64 a)))))))
(/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))
(.f64 (pow.f64 (cbrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) 2) (.f64 (cbrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 1 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (*.f64 a (neg.f64 a)))))))
(/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))
(.f64 (.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle))))) 2) (/.f64 1 (fma.f64 b b (.f64 a (neg.f64 a)))))
(/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))
(.f64 (/.f64 1 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a))))) (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2)))
(/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))
(.f64 (neg.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 1 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (neg.f64 (fma.f64 b b (*.f64 a (neg.f64 a)))))))
(.f64 (neg.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 1 (.f64 (+.f64 0 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) (.f64 1/2 (neg.f64 (-.f64 (.f64 b b) (.f64 a a)))))))
(/.f64 (neg.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle))) (.f64 -1/2 (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (fma.f64 b b (.f64 a (neg.f64 a))))))
(/.f64 (fma.f64 2 (.f64 (.f64 a a) (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 b b))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))
(/.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 (/.f64 1 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2)) (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (fma.f64 b b (.f64 a (neg.f64 a)))))
(/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))
(.f64 (/.f64 1 (fma.f64 b b (.f64 a (neg.f64 a)))) (.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle))))) 2))
(/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))
(.f64 (/.f64 1 (sqrt.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a)))))) (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (sqrt.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a)))))))
(.f64 (/.f64 1 (sqrt.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))) (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (sqrt.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))))
(/.f64 (/.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (sqrt.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle))) 1/2)))) (sqrt.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle))) 1/2))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a))))) 2)) (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (cbrt.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a)))))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2))) 2)) (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (cbrt.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))))
(/.f64 (/.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (cbrt.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle))) 1/2)))) (pow.f64 (cbrt.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle))) 1/2))) 2))
(.f64 (/.f64 (.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle))))) 2) (-.f64 (pow.f64 b 4) (pow.f64 a 4))) (fma.f64 b b (.f64 a a)))
(.f64 (/.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (+.f64 0 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) (/.f64 (-.f64 (pow.f64 b 4) (pow.f64 a 4)) 2)) (fma.f64 b b (*.f64 a a)))
(/.f64 (.f64 (/.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (.f64 2 (fma.f64 b b (*.f64 a a)))) (-.f64 (pow.f64 b 4) (pow.f64 a 4)))
(.f64 (/.f64 (.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle))))) 2) (-.f64 (pow.f64 b 6) (pow.f64 a 6))) (+.f64 (pow.f64 (.f64 b a) 2) (+.f64 (pow.f64 b 4) (pow.f64 a 4))))
(.f64 (/.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (+.f64 0 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle))))) (/.f64 (-.f64 (pow.f64 b 6) (pow.f64 a 6)) 2)) (+.f64 (pow.f64 (*.f64 b a) 2) (+.f64 (pow.f64 b 4) (pow.f64 a 4))))
(/.f64 (.f64 (/.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (.f64 2 (+.f64 (pow.f64 a 4) (+.f64 (pow.f64 b 4) (pow.f64 (*.f64 b a) 2))))) (-.f64 (pow.f64 b 6) (pow.f64 a 6)))
(.f64 (/.f64 (sqrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (sqrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (fma.f64 b b (*.f64 a (neg.f64 a))))))
(/.f64 (fma.f64 2 (.f64 (.f64 a a) (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 b b))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))
(/.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 (/.f64 (sqrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) 1) (/.f64 (sqrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a))))))
(/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))
(.f64 (/.f64 (sqrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2)) (/.f64 (sqrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (fma.f64 b b (*.f64 a (neg.f64 a)))))
(/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) 2) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cbrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (fma.f64 b b (*.f64 a (neg.f64 a))))))
(/.f64 (fma.f64 2 (.f64 (.f64 a a) (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 b b))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))
(/.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) 2) 1) (/.f64 (cbrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a))))))
(/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))
(.f64 (/.f64 (sqrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (fma.f64 b b (.f64 a (neg.f64 a)))) (/.f64 (sqrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2)))
(/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))
(.f64 (/.f64 (sqrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (pow.f64 (cbrt.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a))))) 2)) (/.f64 (sqrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (cbrt.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (*.f64 a (neg.f64 a)))))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2))) 2)) (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (cbrt.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))))
(/.f64 (/.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (cbrt.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle))) 1/2)))) (pow.f64 (cbrt.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle))) 1/2))) 2))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) 2) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2)) (/.f64 (cbrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (fma.f64 b b (*.f64 a (neg.f64 a)))))
(/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) 2) (fma.f64 b b (.f64 a (neg.f64 a)))) (/.f64 (cbrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2)))
(/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) 2) (sqrt.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a)))))) (/.f64 (cbrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (sqrt.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (*.f64 a (neg.f64 a)))))))
(.f64 (/.f64 1 (sqrt.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))) (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (sqrt.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))))
(/.f64 (/.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (sqrt.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle))) 1/2)))) (sqrt.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle))) 1/2))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) 2) (pow.f64 (cbrt.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a))))) 2)) (cbrt.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (*.f64 a (neg.f64 a)))))))
(.f64 (cbrt.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))) (/.f64 (pow.f64 (cbrt.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) 2) (pow.f64 (cbrt.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2))) 2)))
(.f64 (cbrt.f64 (.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (pow.f64 (cbrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)))) 2) (pow.f64 (cbrt.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle))) 1/2))) 2)))
(pow.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a))))) 1)
(/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))
(pow.f64 (sqrt.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a)))))) 2)
(/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))
(pow.f64 (cbrt.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a)))))) 3)
(/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))
(pow.f64 (pow.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a))))) 3) 1/3)
(/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))
(pow.f64 (/.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (fma.f64 b b (*.f64 a (neg.f64 a))))) -1)
(/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))
(neg.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (neg.f64 (fma.f64 b b (.f64 a (neg.f64 a)))))))
(.f64 (neg.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 1 (.f64 (+.f64 0 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) (.f64 1/2 (neg.f64 (-.f64 (.f64 b b) (.f64 a a)))))))
(/.f64 (neg.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle))) (.f64 -1/2 (-.f64 (.f64 b b) (.f64 a a)))))
(sqrt.f64 (pow.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a))))) 2))
(sqrt.f64 (pow.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2))) 2))
(fabs.f64 (.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (*.f64 a a)))))
(log.f64 (exp.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a)))))))
(/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))
(log.f64 (+.f64 1 (expm1.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a))))))))
(/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))
(cbrt.f64 (pow.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a))))) 3))
(/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))
(cbrt.f64 (/.f64 (pow.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) 3) (pow.f64 (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a)))) 3)))
(/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))
(expm1.f64 (log1p.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a)))))))
(/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))
(exp.f64 (log.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a)))))))
(/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))
(exp.f64 (.f64 (log.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (*.f64 a (neg.f64 a)))))) 1))
(/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))
(log1p.f64 (expm1.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (.f64 a (neg.f64 a)))))))
(/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))
(.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (/.f64 2 (sin.f64 (.f64 (PI.f64) (.f64 1/90 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))

eval1.1s (0.8%)

Compiler: Compiled 74622 to 41300 computations (44.7% saved)

prune1.2s (0.8%)

Pruning

97 alts after pruning (97 fresh and 0 done)

	Pruned	Kept	Total
New	1386	79	1465
Fresh	45	18	63
Picked	1	0	1
Done	4	0	4
Total	1436	97	1533

Accurracy

84.8%

Counts

1533 → 97

Alt Table

Click to see full alt table

Status	Accuracy	Program
	11.4%	(/.f64 180 (/.f64 (PI.f64) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180))))
	11.4%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
	11.4%	(.f64 (/.f64 1 (PI.f64)) (.f64 180 (atan.f64 (*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64))))))
	38.4%	(.f64 (atan.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 3)) (/.f64 180 (PI.f64)))
	41.1%	(.f64 (atan.f64 (/.f64 (.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 180 (PI.f64)))
	38.4%	(.f64 (atan.f64 (/.f64 (.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) (/.f64 180 (PI.f64)))
	38.2%	(.f64 (atan.f64 (/.f64 (.f64 y-scale -180) (.f64 angle (.f64 (PI.f64) x-scale)))) (/.f64 180 (PI.f64)))
	38.2%	(.f64 (atan.f64 (/.f64 (.f64 -180 y-scale) (.f64 (.f64 x-scale angle) (PI.f64)))) (/.f64 180 (PI.f64)))
	38.5%	(.f64 (atan.f64 (/.f64 1 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) y-scale))) (/.f64 180 (PI.f64)))
	19.9%	(.f64 (atan.f64 (.f64 (/.f64 (sqrt.f64 y-scale) (.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (/.f64 x-scale (cos.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))) (sqrt.f64 y-scale))) (/.f64 180 (PI.f64)))
	18.3%	(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (/.f64 180 (PI.f64)))
	18.0%	(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 1 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))))) (/.f64 180 (PI.f64)))
	42.9%	(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 1/2 (.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) (/.f64 180 (PI.f64)))
	22.9%	(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (/.f64 1/360 (/.f64 (.f64 b b) (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (.f64 (*.f64 x-scale x-scale) angle))))))) (/.f64 180 (PI.f64)))
	43.8%	(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))) (/.f64 180 (PI.f64)))
	44.7%	(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (.f64 -1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 180 (PI.f64)))
	50.9%	(.f64 (atan.f64 (.f64 y-scale (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))))) (/.f64 180 (PI.f64)))
	37.5%	(.f64 (atan.f64 (.f64 y-scale (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle)))))) (/.f64 180 (PI.f64)))
	33.6%	(.f64 (atan.f64 (.f64 y-scale (neg.f64 (pow.f64 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3) 1/3)))) (/.f64 180 (PI.f64)))
	37.5%	(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))))) (/.f64 180 (PI.f64)))
	43.7%	(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (pow.f64 (cbrt.f64 x-scale) 2))) (cbrt.f64 x-scale))))) (/.f64 180 (PI.f64)))
	38.8%	(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 180 (PI.f64)))
	43.6%	(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (/.f64 180 (PI.f64)))
	21.3%	(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (exp.f64 (log.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (/.f64 180 (PI.f64)))
	40.7%	(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (cbrt.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (/.f64 180 (PI.f64)))
	46.1%	(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 1 x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
	43.8%	(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))))) (/.f64 180 (PI.f64)))
	38.2%	(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 180 (.f64 (.f64 x-scale angle) (PI.f64)))))) (/.f64 180 (PI.f64)))
	22.6%	(.f64 (atan.f64 (.f64 y-scale (neg.f64 (.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) 2) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))))) (/.f64 180 (PI.f64)))
	42.8%	(.f64 (atan.f64 (.f64 y-scale (neg.f64 (.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))) (/.f64 180 (PI.f64)))
	42.8%	(.f64 (atan.f64 (.f64 y-scale (neg.f64 (.f64 (/.f64 (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (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 180 (PI.f64)))
	22.5%	(.f64 (atan.f64 (.f64 y-scale (neg.f64 (.f64 (/.f64 (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))))) (/.f64 180 (PI.f64)))
	22.5%	(.f64 (atan.f64 (.f64 y-scale (neg.f64 (.f64 (/.f64 (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)))))) (/.f64 180 (PI.f64)))
	42.8%	(.f64 (atan.f64 (.f64 y-scale (neg.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 1 x-scale))))) (/.f64 180 (PI.f64)))
	42.0%	(.f64 (atan.f64 (.f64 y-scale (neg.f64 (.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) (.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) 2)) (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale)) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))) 2)))))) (/.f64 180 (PI.f64)))
	21.1%	(.f64 (atan.f64 (.f64 y-scale (neg.f64 (exp.f64 (log.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))) (/.f64 180 (PI.f64)))
	21.8%	(.f64 (atan.f64 (.f64 y-scale (cbrt.f64 (pow.f64 (.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (/.f64 (/.f64 (.f64 x-scale -1) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) 3)))) (/.f64 180 (PI.f64)))
▶	43.7%	(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
	38.2%	(.f64 (atan.f64 (.f64 -180 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64)))))) (/.f64 180 (PI.f64)))
	39.4%	(.f64 180 (/.f64 (atan.f64 (pow.f64 (pow.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3) 1/3)) (PI.f64)))
	50.8%	(.f64 180 (/.f64 (atan.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (cbrt.f64 y-scale)))) (PI.f64)))
	50.9%	(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (cbrt.f64 x-scale))) (PI.f64)))
	22.6%	(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale (sqrt.f64 x-scale)) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 x-scale)))) (PI.f64)))
▶	52.2%	(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) (PI.f64)))
	42.8%	(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 (.f64 1/180 (.f64 y-scale angle)) (PI.f64)) x-scale)) (PI.f64)))
	50.0%	(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 (cbrt.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 x-scale (cbrt.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))) (PI.f64)))
	50.1%	(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale)) (PI.f64)))
	17.8%	(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 -1/2 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
	11.4%	(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 -180 x-scale) (.f64 y-scale (.f64 angle (PI.f64))))) (PI.f64)))
	28.7%	(.f64 180 (/.f64 (atan.f64 (/.f64 (sqrt.f64 y-scale) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sqrt.f64 y-scale))))) (PI.f64)))
	50.9%	(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 1 x-scale)))) (PI.f64)))
	50.1%	(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (PI.f64)))
▶	50.9%	(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) (PI.f64)))
	50.1%	(.f64 180 (/.f64 (atan.f64 (/.f64 1 (/.f64 x-scale (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (PI.f64)))
	51.9%	(.f64 180 (/.f64 (atan.f64 (/.f64 -1 (.f64 (/.f64 x-scale y-scale) (neg.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))) (PI.f64)))
	51.3%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2))) (PI.f64)))
▶	52.1%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
	21.6%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (pow.f64 (pow.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 3) 1/3)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
	31.8%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (pow.f64 (sqrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
	49.5%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (pow.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
	48.2%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle (log.f64 (exp.f64 1/180))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
	51.0%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (fabs.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (PI.f64)))
	50.3%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (pow.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3))))) (PI.f64)))
	50.1%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 angle (log.f64 (exp.f64 1/180)))))))) (PI.f64)))
	51.5%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (PI.f64)))
	31.3%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (exp.f64 (log.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))) (PI.f64)))
	51.0%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1))) (PI.f64)))
	51.4%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
	51.4%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (PI.f64)))
	46.5%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fabs.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
	42.1%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (expm1.f64 (log1p.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
	30.2%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (exp.f64 (log.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
	45.4%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (fabs.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
	45.4%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (fabs.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
	51.4%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (PI.f64)))
	44.1%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (PI.f64)))
	11.4%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (neg.f64 x-scale) (*.f64 (PI.f64) (neg.f64 angle))))) (PI.f64)))
	39.5%	(.f64 180 (/.f64 (atan.f64 (.f64 (.f64 -1/2 (/.f64 (.f64 2 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale)))) (*.f64 y-scale x-scale))) (PI.f64)))
	41.6%	(.f64 180 (/.f64 (atan.f64 (.f64 (.f64 -1/2 (/.f64 -2 (/.f64 (.f64 x-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (*.f64 y-scale x-scale))) (PI.f64)))
	50.1%	(.f64 180 (/.f64 (atan.f64 (.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale))) (PI.f64)))
	10.8%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (.f64 (/.f64 (.f64 angle (PI.f64)) 1) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))))) (PI.f64)))
	8.6%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 x-scale (*.f64 angle (PI.f64)))))))) (PI.f64)))
	38.7%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 -2 (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale)))) (PI.f64)))
	10.0%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle)) y-scale))) (PI.f64)))
	1.9%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (/.f64 (.f64 a a) angle) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b)))))))) (PI.f64)))
	12.5%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))) (PI.f64)))
	32.1%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (+.f64 a b))) (-.f64 b a)) y-scale))))) (PI.f64)))
	11.4%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (.f64 (/.f64 (/.f64 1 y-scale) (*.f64 angle (PI.f64))) x-scale)))) (PI.f64)))
	42.8%	(.f64 180 (/.f64 (atan.f64 (.f64 1/180 (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale))) (PI.f64)))
▶	43.6%	(.f64 180 (/.f64 (atan.f64 (.f64 1/180 (/.f64 y-scale (/.f64 x-scale (*.f64 angle (PI.f64)))))) (PI.f64)))
	18.5%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (*.f64 b b))))))) (PI.f64)))
	29.3%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))))) (PI.f64)))
	43.9%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))) (PI.f64)))
	27.0%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (log1p.f64 (expm1.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (*.f64 a (neg.f64 a)))))))))) (PI.f64)))
	23.5%	(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 y-scale (/.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 b b))))) (PI.f64)))
	44.0%	(.f64 180 (/.f64 (atan.f64 (fabs.f64 (.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale)))) (PI.f64)))
	36.1%	(.f64 180 (/.f64 (atan.f64 (exp.f64 (log.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (PI.f64)))

Compiler

Compiled 6210 to 4718 computations (24% saved)

localize42.0ms (0%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	99.5%	(/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
	99.4%	(.f64 (PI.f64) (.f64 1/180 angle))
✓	95.2%	(/.f64 (/.f64 y-scale x-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
✓	60.5%	(tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))

Compiler

Compiled 94 to 60 computations (36.2% saved)

series10.0ms (0%)

Counts

3 → 60

Calls

15 calls:

Time	Variable		Expression
1.0ms	angle	@	(/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
1.0ms	y-scale	@	(/.f64 (/.f64 y-scale x-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
1.0ms	angle	@	(/.f64 (/.f64 y-scale x-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
1.0ms	angle	@	(tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
1.0ms	x-scale	@	(/.f64 (/.f64 y-scale x-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))

rewrite140.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

1098×	`swap-sqr`
876×	`associate-/r/`
730×	`associate-/l/`
406×	`distribute-lft-neg-in`
360×	`distribute-rgt-neg-in`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	16	81
1	333	75
2	4333	75

Stop Event

1×	node limit

Counts

3 → 162

Calls

Call 1

Inputs
(tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(/.f64 (/.f64 y-scale x-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))

Outputs

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

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

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

simplify135.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

1160×	`associate-r`
1084×	`associate-l`
668×	`associate-+r+`
602×	`associate-/l*`
566×	`*-commutative`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	459	10064
1	1221	9942
2	6964	9942

Stop Event

1×	node limit

Counts

222 → 241

Calls

Call 1

Inputs
(.f64 1/180 (.f64 angle (PI.f64)))
(+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (.f64 (pow.f64 angle 3) (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (pow.f64 (PI.f64) 3)))))
(+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (+.f64 (.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (.f64 (pow.f64 angle 3) (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))))))
(+.f64 (.f64 (pow.f64 angle 7) (-.f64 (.f64 -1/30855889612800000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 1/25194240000 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 4))) (.f64 -1/64800 (.f64 (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))) (pow.f64 (PI.f64) 2))))))) (+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (+.f64 (.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (.f64 (pow.f64 angle 3) (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (pow.f64 (PI.f64) 3)))))))
(/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(+.f64 (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 3) (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))))) x-scale) (.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale)))
(+.f64 (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 3) (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))))) x-scale) (+.f64 (.f64 1/180 (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)) (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (*.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))))) x-scale)))
(+.f64 (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 3) (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))))) x-scale) (+.f64 (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 7) (-.f64 (.f64 -1/30855889612800000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 1/25194240000 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 4))) (.f64 -1/64800 (.f64 (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))) (pow.f64 (PI.f64) 2)))))))) x-scale) (+.f64 (.f64 1/180 (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)) (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (*.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))))) x-scale))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 180 (*.f64 angle (PI.f64)))
(+.f64 (.f64 -32400 (/.f64 (.f64 angle (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3)))) (pow.f64 (PI.f64) 2))) (.f64 180 (/.f64 1 (.f64 angle (PI.f64)))))
(+.f64 (.f64 -32400 (/.f64 (.f64 angle (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3)))) (pow.f64 (PI.f64) 2))) (+.f64 (.f64 180 (/.f64 1 (.f64 angle (PI.f64)))) (.f64 -1 (.f64 (pow.f64 angle 3) (+.f64 (.f64 -5832000 (/.f64 (pow.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) 2) (pow.f64 (PI.f64) 3))) (.f64 32400 (/.f64 (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))) (pow.f64 (PI.f64) 2))))))))
(+.f64 (.f64 -32400 (/.f64 (.f64 angle (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3)))) (pow.f64 (PI.f64) 2))) (+.f64 (.f64 -1 (.f64 (pow.f64 angle 5) (+.f64 (.f64 -180 (/.f64 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (+.f64 (.f64 -5832000 (/.f64 (pow.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) 2) (pow.f64 (PI.f64) 3))) (.f64 32400 (/.f64 (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))) (pow.f64 (PI.f64) 2))))) (PI.f64))) (+.f64 (.f64 32400 (/.f64 (-.f64 (.f64 -1/30855889612800000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 1/25194240000 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 4))) (.f64 -1/64800 (.f64 (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))) (pow.f64 (PI.f64) 2)))))) (pow.f64 (PI.f64) 2))) (.f64 -5832000 (/.f64 (.f64 (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))) (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3)))) (pow.f64 (PI.f64) 3))))))) (+.f64 (.f64 180 (/.f64 1 (.f64 angle (PI.f64)))) (.f64 -1 (.f64 (pow.f64 angle 3) (+.f64 (.f64 -5832000 (/.f64 (pow.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) 2) (pow.f64 (PI.f64) 3))) (.f64 32400 (/.f64 (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (*.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))) (pow.f64 (PI.f64) 2)))))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(-.f64 (exp.f64 (log1p.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 1)
(.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (neg.f64 (neg.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2))
(.f64 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (neg.f64 (neg.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 1)
(.f64 -1 (neg.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 1 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (sqrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (sqrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 (.f64 (cbrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (neg.f64 (cbrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(.f64 (neg.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (neg.f64 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (neg.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 1 (/.f64 1 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 1) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 -1)) (sqrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) 1) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) -1) (cbrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (/.f64 1 (cbrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -2))) 1) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 (/.f64 1 (cbrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -2))) -1) (cbrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (neg.f64 (sqrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (sqrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (neg.f64 (.f64 (cbrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (cbrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (neg.f64 (neg.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (neg.f64 (neg.f64 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 1 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 1 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -1/2))
(/.f64 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1)
(/.f64 -1 (/.f64 -1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) -1)
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(/.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -1/2) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (/.f64 1 (cbrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -2))) (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (neg.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(pow.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) -1)
(pow.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)
(pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3)
(pow.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3) 1/3)
(pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1)
(neg.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(neg.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(sqrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(log.f64 (exp.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(log.f64 (+.f64 1 (expm1.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(cbrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3))
(expm1.f64 (log1p.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(exp.f64 (log.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(exp.f64 (.f64 (log.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 1))
(log1p.f64 (expm1.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(-.f64 (exp.f64 (log1p.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) 1)
(.f64 y-scale (.f64 (/.f64 1 x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 1 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 1)
(.f64 (sqrt.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sqrt.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 y-scale x-scale) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 2))
(.f64 (pow.f64 (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2) (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(.f64 -1 (.f64 (/.f64 y-scale x-scale) (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (/.f64 (neg.f64 y-scale) x-scale) (neg.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (/.f64 y-scale x-scale)))
(.f64 (/.f64 1 (cbrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -2))) (.f64 (/.f64 y-scale x-scale) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (.f64 (/.f64 y-scale 1) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 1 x-scale))
(.f64 (.f64 (/.f64 y-scale x-scale) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (/.f64 y-scale 1) (.f64 (/.f64 1 x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (.f64 (/.f64 1 x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) y-scale)
(.f64 (.f64 (/.f64 (sqrt.f64 y-scale) 1) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (sqrt.f64 y-scale) x-scale))
(.f64 (.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) 1) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cbrt.f64 y-scale) x-scale))
(.f64 (/.f64 y-scale (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -1/2)) (/.f64 (/.f64 1 x-scale) (pow.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) -1/2)))
(.f64 (/.f64 y-scale (cbrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -2))) (.f64 (/.f64 (/.f64 1 x-scale) 1) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (cbrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -2))) (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) 1) (.f64 (/.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 1) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -1/2)) (/.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (pow.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) -1/2)))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (cbrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -2))) (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 1 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 1 (/.f64 1 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 1 x-scale))
(.f64 (/.f64 1 (/.f64 1 (.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (cbrt.f64 (/.f64 y-scale x-scale)))
(.f64 (/.f64 (sqrt.f64 y-scale) (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (sqrt.f64 y-scale))
(.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (cbrt.f64 y-scale))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (cbrt.f64 (/.f64 y-scale x-scale)))
(.f64 (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) y-scale)
(.f64 (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (sqrt.f64 x-scale)) (/.f64 y-scale (sqrt.f64 x-scale)))
(.f64 (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 y-scale (cbrt.f64 x-scale)))
(.f64 (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (neg.f64 x-scale)) (neg.f64 y-scale))
(.f64 (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale 1)) y-scale)
(.f64 (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale (sqrt.f64 y-scale))) (sqrt.f64 y-scale))
(.f64 (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale (pow.f64 (cbrt.f64 y-scale) 2))) (cbrt.f64 y-scale))
(.f64 (/.f64 (.f64 (/.f64 y-scale x-scale) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 1) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (/.f64 (.f64 (/.f64 y-scale x-scale) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sqrt.f64 -1)) (sqrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (/.f64 (/.f64 (/.f64 y-scale x-scale) (cbrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -2))) 1) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 (/.f64 (/.f64 y-scale x-scale) (cbrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -2))) -1) (cbrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(pow.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 1)
(pow.f64 (sqrt.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 2)
(pow.f64 (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 3)
(pow.f64 (pow.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 3) 1/3)
(pow.f64 (.f64 1 (/.f64 x-scale (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) -1)
(neg.f64 (.f64 (/.f64 y-scale x-scale) (neg.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(neg.f64 (.f64 1 (.f64 (/.f64 y-scale x-scale) (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(neg.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 1))
(neg.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 (neg.f64 y-scale) x-scale)))
(neg.f64 (/.f64 (.f64 (/.f64 y-scale x-scale) (neg.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 1))
(sqrt.f64 (pow.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2))
(log.f64 (pow.f64 (exp.f64 (/.f64 y-scale x-scale)) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(cbrt.f64 (pow.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 3))
(cbrt.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 3) (/.f64 1 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3))))
(expm1.f64 (log1p.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(exp.f64 (log.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(exp.f64 (.f64 (log.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 1))
(log1p.f64 (expm1.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(-.f64 (exp.f64 (log1p.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 1)
(.f64 1 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 1 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 1)
(.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -1/2) (pow.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) -1/2))
(.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -1/2) (neg.f64 (/.f64 -1 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) -2)))
(.f64 (cbrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -2)) (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (cbrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -2)) (neg.f64 (/.f64 -1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 -1 (/.f64 -1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 -1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) -1)
(.f64 (sqrt.f64 (/.f64 -1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (sqrt.f64 (/.f64 -1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 (.f64 (cbrt.f64 (/.f64 -1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (/.f64 -1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (neg.f64 (cbrt.f64 (/.f64 -1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 -1 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 -1 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (neg.f64 (cbrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -2))) (/.f64 -1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (pow.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) -1) (pow.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) -1))
(.f64 (pow.f64 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) -1) (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) -1))
(.f64 (/.f64 1 (/.f64 1 (cbrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -2)))) (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 1 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -1/2) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 -1 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 (/.f64 1 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 -1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (sqrt.f64 (/.f64 -1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (neg.f64 (.f64 (cbrt.f64 (/.f64 -1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (/.f64 -1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (cbrt.f64 (/.f64 -1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (neg.f64 (/.f64 -1 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (pow.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) -1/2))
(.f64 (neg.f64 (neg.f64 (cbrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -2)))) (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(pow.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 1)
(pow.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -1/2) 2)
(pow.f64 (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 3)
(pow.f64 (/.f64 1 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)) 1/3)
(pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -1)
(neg.f64 (/.f64 -1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(sqrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -2))
(log.f64 (exp.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(log.f64 (+.f64 1 (expm1.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(cbrt.f64 (/.f64 1 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)))
(expm1.f64 (log1p.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(exp.f64 (neg.f64 (log.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(exp.f64 (.f64 (log.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) -1))
(exp.f64 (.f64 (neg.f64 (log.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 1))
(log1p.f64 (expm1.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))

Outputs
(.f64 1/180 (.f64 angle (PI.f64)))
(+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (.f64 (pow.f64 angle 3) (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (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/17496000)))
(fma.f64 1/180 (.f64 angle (PI.f64)) (.f64 (pow.f64 (PI.f64) 3) (*.f64 1/17496000 (pow.f64 angle 3))))
(+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (+.f64 (.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (.f64 (pow.f64 angle 3) (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))))))
(fma.f64 1/180 (.f64 angle (PI.f64)) (fma.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 (PI.f64) 5) 1/4534963200000))) (.f64 (pow.f64 angle 3) (*.f64 (pow.f64 (PI.f64) 3) 1/17496000))))
(fma.f64 1/180 (.f64 angle (PI.f64)) (fma.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 3) (.f64 1/17496000 (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 (PI.f64) 5) 1/4534963200000))) (.f64 (pow.f64 (PI.f64) 3) (*.f64 1/17496000 (pow.f64 angle 3)))))
(+.f64 (.f64 (pow.f64 angle 7) (-.f64 (.f64 -1/30855889612800000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 1/25194240000 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 4))) (.f64 -1/64800 (.f64 (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))) (pow.f64 (PI.f64) 2))))))) (+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (+.f64 (.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (.f64 (pow.f64 angle 3) (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (pow.f64 (PI.f64) 3)))))))
(fma.f64 (pow.f64 angle 7) (-.f64 (.f64 -1/30855889612800000000 (pow.f64 (PI.f64) 7)) (fma.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7) (fma.f64 1/25194240000 (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (pow.f64 (PI.f64) 4)) (.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 (PI.f64) 5) 1/4534963200000)))))))) (fma.f64 1/180 (.f64 angle (PI.f64)) (fma.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 (PI.f64) 5) 1/4534963200000))) (.f64 (pow.f64 angle 3) (.f64 (pow.f64 (PI.f64) 3) 1/17496000)))))
(fma.f64 (pow.f64 angle 7) (-.f64 (.f64 (pow.f64 (PI.f64) 7) 1/5142648268800000000) (fma.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 3) (.f64 1/17496000 (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 (PI.f64) 5) 1/4534963200000)))) (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (.f64 (pow.f64 (PI.f64) 4) 1/25194240000)))) (fma.f64 1/180 (.f64 angle (PI.f64)) (fma.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 3) (.f64 1/17496000 (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 (PI.f64) 5) 1/4534963200000))) (.f64 (pow.f64 (PI.f64) 3) (.f64 1/17496000 (pow.f64 angle 3))))))
(/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 y-scale x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 y-scale (/.f64 x-scale (.f64 angle (PI.f64)))))
(/.f64 1/180 (/.f64 x-scale (.f64 angle (.f64 (PI.f64) y-scale))))
(+.f64 (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 3) (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))))) x-scale) (.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale)))
(+.f64 (.f64 1/180 (/.f64 y-scale (/.f64 x-scale (.f64 angle (PI.f64))))) (/.f64 y-scale (/.f64 x-scale (.f64 (pow.f64 angle 3) (.f64 (pow.f64 (PI.f64) 3) 1/17496000)))))
(fma.f64 1/180 (.f64 (/.f64 y-scale x-scale) (.f64 angle (PI.f64))) (.f64 (/.f64 y-scale x-scale) (.f64 (pow.f64 (PI.f64) 3) (*.f64 1/17496000 (pow.f64 angle 3)))))
(+.f64 (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 3) (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))))) x-scale) (+.f64 (.f64 1/180 (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)) (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (*.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))))) x-scale)))
(+.f64 (/.f64 y-scale (/.f64 x-scale (.f64 (pow.f64 angle 3) (.f64 (pow.f64 (PI.f64) 3) 1/17496000)))) (fma.f64 1/180 (/.f64 y-scale (/.f64 x-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 (.f64 y-scale (pow.f64 angle 5)) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 (PI.f64) 5) 1/4534963200000)))) x-scale)))
(+.f64 (fma.f64 1/180 (.f64 (/.f64 y-scale x-scale) (.f64 angle (PI.f64))) (.f64 (/.f64 y-scale x-scale) (.f64 (pow.f64 (PI.f64) 3) (.f64 1/17496000 (pow.f64 angle 3))))) (.f64 (/.f64 y-scale x-scale) (.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 3) (.f64 1/17496000 (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 (PI.f64) 5) 1/4534963200000))))))
(+.f64 (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 3) (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))))) x-scale) (+.f64 (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 7) (-.f64 (.f64 -1/30855889612800000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 1/25194240000 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 4))) (.f64 -1/64800 (.f64 (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))) (pow.f64 (PI.f64) 2)))))))) x-scale) (+.f64 (.f64 1/180 (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)) (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (*.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))))) x-scale))))
(+.f64 (/.f64 y-scale (/.f64 x-scale (.f64 (pow.f64 angle 3) (.f64 (pow.f64 (PI.f64) 3) 1/17496000)))) (+.f64 (fma.f64 1/180 (/.f64 y-scale (/.f64 x-scale (.f64 angle (PI.f64)))) (/.f64 (.f64 (.f64 y-scale (pow.f64 angle 5)) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 (PI.f64) 5) 1/4534963200000)))) x-scale)) (/.f64 y-scale (/.f64 x-scale (.f64 (pow.f64 angle 7) (-.f64 (.f64 -1/30855889612800000000 (pow.f64 (PI.f64) 7)) (fma.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7) (fma.f64 1/25194240000 (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (pow.f64 (PI.f64) 4)) (.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 (PI.f64) 5) 1/4534963200000)))))))))))))
(+.f64 (fma.f64 1/180 (.f64 (/.f64 y-scale x-scale) (.f64 angle (PI.f64))) (.f64 (/.f64 y-scale x-scale) (.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 3) (.f64 1/17496000 (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 (PI.f64) 5) 1/4534963200000)))))) (+.f64 (.f64 (/.f64 y-scale x-scale) (.f64 (pow.f64 (PI.f64) 3) (.f64 1/17496000 (pow.f64 angle 3)))) (.f64 (/.f64 y-scale x-scale) (.f64 (pow.f64 angle 7) (-.f64 (.f64 (pow.f64 (PI.f64) 7) 1/5142648268800000000) (fma.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 3) (.f64 1/17496000 (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 (PI.f64) 5) 1/4534963200000)))) (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (.f64 (pow.f64 (PI.f64) 4) 1/25194240000))))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (/.f64 y-scale x-scale))
(/.f64 180 (*.f64 angle (PI.f64)))
(/.f64 (/.f64 180 angle) (PI.f64))
(+.f64 (.f64 -32400 (/.f64 (.f64 angle (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3)))) (pow.f64 (PI.f64) 2))) (.f64 180 (/.f64 1 (.f64 angle (PI.f64)))))
(fma.f64 -32400 (/.f64 angle (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 (PI.f64) 3) 1/17496000))) (/.f64 (/.f64 180 angle) (PI.f64)))
(fma.f64 -32400 (.f64 (/.f64 angle (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 (PI.f64) 3) 1/17496000)) (/.f64 180 (*.f64 angle (PI.f64))))
(+.f64 (.f64 -32400 (/.f64 (.f64 angle (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3)))) (pow.f64 (PI.f64) 2))) (+.f64 (.f64 180 (/.f64 1 (.f64 angle (PI.f64)))) (.f64 -1 (.f64 (pow.f64 angle 3) (+.f64 (.f64 -5832000 (/.f64 (pow.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) 2) (pow.f64 (PI.f64) 3))) (.f64 32400 (/.f64 (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))) (pow.f64 (PI.f64) 2))))))))
(+.f64 (fma.f64 -32400 (/.f64 angle (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 (PI.f64) 3) 1/17496000))) (/.f64 (/.f64 180 angle) (PI.f64))) (neg.f64 (.f64 (pow.f64 angle 3) (fma.f64 -5832000 (/.f64 (pow.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) 2) (pow.f64 (PI.f64) 3)) (.f64 32400 (/.f64 (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 (PI.f64) 5) 1/4534963200000))) (pow.f64 (PI.f64) 2)))))))
(-.f64 (fma.f64 -32400 (.f64 (/.f64 angle (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 (PI.f64) 3) 1/17496000)) (/.f64 180 (.f64 angle (PI.f64)))) (.f64 (pow.f64 angle 3) (fma.f64 -5832000 (/.f64 (pow.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) 2) (pow.f64 (PI.f64) 3)) (.f64 32400 (/.f64 (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 3) (.f64 1/17496000 (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 (PI.f64) 5) 1/4534963200000))) (pow.f64 (PI.f64) 2))))))
(+.f64 (.f64 -32400 (/.f64 (.f64 angle (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3)))) (pow.f64 (PI.f64) 2))) (+.f64 (.f64 -1 (.f64 (pow.f64 angle 5) (+.f64 (.f64 -180 (/.f64 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (+.f64 (.f64 -5832000 (/.f64 (pow.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) 2) (pow.f64 (PI.f64) 3))) (.f64 32400 (/.f64 (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))) (pow.f64 (PI.f64) 2))))) (PI.f64))) (+.f64 (.f64 32400 (/.f64 (-.f64 (.f64 -1/30855889612800000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 1/25194240000 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 4))) (.f64 -1/64800 (.f64 (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))) (pow.f64 (PI.f64) 2)))))) (pow.f64 (PI.f64) 2))) (.f64 -5832000 (/.f64 (.f64 (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))) (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3)))) (pow.f64 (PI.f64) 3))))))) (+.f64 (.f64 180 (/.f64 1 (.f64 angle (PI.f64)))) (.f64 -1 (.f64 (pow.f64 angle 3) (+.f64 (.f64 -5832000 (/.f64 (pow.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) 2) (pow.f64 (PI.f64) 3))) (.f64 32400 (/.f64 (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (*.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))) (pow.f64 (PI.f64) 2)))))))))
(fma.f64 -32400 (/.f64 angle (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 (PI.f64) 3) 1/17496000))) (fma.f64 -1 (.f64 (pow.f64 angle 5) (fma.f64 -180 (/.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (/.f64 (PI.f64) (fma.f64 -5832000 (/.f64 (pow.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) 2) (pow.f64 (PI.f64) 3)) (.f64 32400 (/.f64 (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 (PI.f64) 5) 1/4534963200000))) (pow.f64 (PI.f64) 2)))))) (fma.f64 32400 (/.f64 (-.f64 (.f64 -1/30855889612800000000 (pow.f64 (PI.f64) 7)) (fma.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7) (fma.f64 1/25194240000 (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (pow.f64 (PI.f64) 4)) (.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 (PI.f64) 5) 1/4534963200000)))))))) (pow.f64 (PI.f64) 2)) (.f64 -5832000 (/.f64 (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 (PI.f64) 5) 1/4534963200000))) (/.f64 (pow.f64 (PI.f64) 3) (.f64 (pow.f64 (PI.f64) 3) 1/17496000))))))) (+.f64 (/.f64 (/.f64 180 angle) (PI.f64)) (neg.f64 (.f64 (pow.f64 angle 3) (fma.f64 -5832000 (/.f64 (pow.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) 2) (pow.f64 (PI.f64) 3)) (.f64 32400 (/.f64 (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 (PI.f64) 5) 1/4534963200000))) (pow.f64 (PI.f64) 2)))))))))
(fma.f64 -32400 (.f64 (/.f64 angle (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 (PI.f64) 3) 1/17496000)) (-.f64 (-.f64 (/.f64 180 (.f64 angle (PI.f64))) (.f64 (pow.f64 angle 3) (fma.f64 -5832000 (/.f64 (pow.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) 2) (pow.f64 (PI.f64) 3)) (.f64 32400 (/.f64 (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 3) (.f64 1/17496000 (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 (PI.f64) 5) 1/4534963200000))) (pow.f64 (PI.f64) 2)))))) (.f64 (pow.f64 angle 5) (fma.f64 -180 (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (PI.f64)) (fma.f64 -5832000 (/.f64 (pow.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) 2) (pow.f64 (PI.f64) 3)) (.f64 32400 (/.f64 (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 3) (.f64 1/17496000 (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 (PI.f64) 5) 1/4534963200000))) (pow.f64 (PI.f64) 2))))) (fma.f64 32400 (/.f64 (-.f64 (.f64 (pow.f64 (PI.f64) 7) 1/5142648268800000000) (fma.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 3) (.f64 1/17496000 (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 (PI.f64) 5) 1/4534963200000)))) (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (.f64 (pow.f64 (PI.f64) 4) 1/25194240000)))) (pow.f64 (PI.f64) 2)) (.f64 -5832000 (.f64 (/.f64 (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 3) (.f64 1/17496000 (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 (PI.f64) 5) 1/4534963200000))) (pow.f64 (PI.f64) 3)) (*.f64 (pow.f64 (PI.f64) 3) 1/17496000))))))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(-.f64 (exp.f64 (log1p.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 1)
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (neg.f64 (neg.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2))
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (neg.f64 (neg.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 1)
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 -1 (neg.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 1 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(.f64 (sqrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (sqrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (.f64 (cbrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (neg.f64 (cbrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (neg.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (neg.f64 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (neg.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(.f64 (/.f64 1 (/.f64 1 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (/.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 1) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (/.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 -1)) (sqrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (sqrt.f64 (neg.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (sqrt.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (sqrt.f64 -1)))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) 1) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) -1) (cbrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (cbrt.f64 (neg.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (pow.f64 (cbrt.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) 2) -1))
(.f64 (cbrt.f64 (neg.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (neg.f64 (pow.f64 (cbrt.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) 2)))
(.f64 (/.f64 (/.f64 1 (cbrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -2))) 1) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (cbrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 1 (cbrt.f64 (pow.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) -2))))
(/.f64 (cbrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cbrt.f64 (pow.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) -2)))
(.f64 (/.f64 (/.f64 1 (cbrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -2))) -1) (cbrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (cbrt.f64 (neg.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 1 (neg.f64 (cbrt.f64 (pow.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) -2)))))
(.f64 (cbrt.f64 (neg.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 -1 (cbrt.f64 (pow.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) -2))))
(.f64 (neg.f64 (sqrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (sqrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (neg.f64 (.f64 (cbrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (cbrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (neg.f64 (neg.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (neg.f64 (neg.f64 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(/.f64 1 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(/.f64 1 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -1/2))
(/.f64 (sqrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (pow.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) -1/2))
(/.f64 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1)
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(/.f64 -1 (/.f64 -1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(/.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) -1)
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -1/2) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) -1/2) (sqrt.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(/.f64 (/.f64 1 (cbrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -2))) (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (cbrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 1 (cbrt.f64 (pow.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) -2))))
(/.f64 (cbrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cbrt.f64 (pow.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) -2)))
(/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 (neg.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(pow.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) -1)
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(pow.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3)
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(pow.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3) 1/3)
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1)
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(neg.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(neg.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(sqrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(sqrt.f64 (pow.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))
(fabs.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(log.f64 (exp.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(log.f64 (+.f64 1 (expm1.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cbrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3))
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(expm1.f64 (log1p.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(exp.f64 (log.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(exp.f64 (.f64 (log.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 1))
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(log1p.f64 (expm1.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(-.f64 (exp.f64 (log1p.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) 1)
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (.f64 (/.f64 1 x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 1 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 1)
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (sqrt.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sqrt.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 y-scale x-scale) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 2))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (pow.f64 (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2) (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 -1 (.f64 (/.f64 y-scale x-scale) (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (neg.f64 y-scale) x-scale))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (/.f64 (neg.f64 y-scale) x-scale) (neg.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (/.f64 y-scale x-scale)))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (/.f64 1 (cbrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -2))) (.f64 (/.f64 y-scale x-scale) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (/.f64 1 (cbrt.f64 (pow.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) -2))) (.f64 (cbrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 y-scale x-scale)))
(.f64 (cbrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (/.f64 y-scale x-scale) (cbrt.f64 (pow.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) -2))))
(.f64 (.f64 (/.f64 y-scale 1) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 1 x-scale))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (.f64 (/.f64 y-scale x-scale) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (/.f64 y-scale 1) (.f64 (/.f64 1 x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (.f64 (/.f64 1 x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) y-scale)
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (.f64 (/.f64 (sqrt.f64 y-scale) 1) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (sqrt.f64 y-scale) x-scale))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) 1) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cbrt.f64 y-scale) x-scale))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (/.f64 y-scale (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -1/2)) (/.f64 (/.f64 1 x-scale) (pow.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) -1/2)))
(.f64 (/.f64 y-scale (pow.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) -1/2)) (/.f64 (/.f64 1 x-scale) (pow.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) -1/2)))
(/.f64 (/.f64 y-scale (pow.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) -1/2)) (/.f64 (pow.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) -1/2) (/.f64 1 x-scale)))
(.f64 (/.f64 y-scale (cbrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -2))) (.f64 (/.f64 (/.f64 1 x-scale) 1) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (.f64 y-scale (.f64 (cbrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 1 x-scale))) (cbrt.f64 (pow.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) -2)))
(/.f64 y-scale (/.f64 (cbrt.f64 (pow.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) -2)) (/.f64 (cbrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale)))
(.f64 (/.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (cbrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -2))) (.f64 (sqrt.f64 (/.f64 y-scale x-scale)) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (/.f64 1 (cbrt.f64 (pow.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) -2))) (.f64 (cbrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 y-scale x-scale)))
(.f64 (cbrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (/.f64 y-scale x-scale) (cbrt.f64 (pow.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) -2))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) 1) (.f64 (/.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 1) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -1/2)) (/.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (pow.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) -1/2)))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (cbrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -2))) (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (cbrt.f64 (.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 y-scale x-scale)))) (cbrt.f64 (pow.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) -2)))
(.f64 (cbrt.f64 (.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale))) (/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (cbrt.f64 (pow.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) -2))))
(.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 1 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (/.f64 1 (/.f64 1 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 1 x-scale))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (/.f64 1 (/.f64 1 (.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (cbrt.f64 (/.f64 y-scale x-scale)))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (/.f64 (sqrt.f64 y-scale) (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (sqrt.f64 y-scale))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (cbrt.f64 y-scale))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2) (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (cbrt.f64 (/.f64 y-scale x-scale)))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) y-scale)
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (sqrt.f64 x-scale)) (/.f64 y-scale (sqrt.f64 x-scale)))
(.f64 (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 x-scale)) (/.f64 y-scale (sqrt.f64 x-scale)))
(.f64 (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 y-scale (cbrt.f64 x-scale)))
(.f64 (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 y-scale (cbrt.f64 x-scale)))
(/.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (/.f64 y-scale (cbrt.f64 x-scale))))
(.f64 (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (neg.f64 x-scale)) (neg.f64 y-scale))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale 1)) y-scale)
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale (sqrt.f64 y-scale))) (sqrt.f64 y-scale))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale (pow.f64 (cbrt.f64 y-scale) 2))) (cbrt.f64 y-scale))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (/.f64 (.f64 (/.f64 y-scale x-scale) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 1) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (/.f64 (.f64 (/.f64 y-scale x-scale) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sqrt.f64 -1)) (sqrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (sqrt.f64 (neg.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (/.f64 y-scale x-scale) (/.f64 (sqrt.f64 -1) (sqrt.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 (sqrt.f64 (neg.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 (/.f64 (/.f64 y-scale x-scale) (sqrt.f64 -1)) (sqrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(.f64 (/.f64 (/.f64 (/.f64 y-scale x-scale) (cbrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -2))) 1) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 1 (cbrt.f64 (pow.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) -2))) (.f64 (cbrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 y-scale x-scale)))
(.f64 (cbrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (/.f64 y-scale x-scale) (cbrt.f64 (pow.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) -2))))
(.f64 (/.f64 (/.f64 (/.f64 y-scale x-scale) (cbrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -2))) -1) (cbrt.f64 (neg.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (cbrt.f64 (neg.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (/.f64 y-scale x-scale) (neg.f64 (cbrt.f64 (pow.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) -2)))))
(/.f64 (.f64 (cbrt.f64 (neg.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 y-scale x-scale)) (neg.f64 (cbrt.f64 (pow.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) -2))))
(pow.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 1)
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(pow.f64 (sqrt.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 2)
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(pow.f64 (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 3)
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(pow.f64 (pow.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 3) 1/3)
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(pow.f64 (.f64 1 (/.f64 x-scale (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) -1)
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(neg.f64 (.f64 (/.f64 y-scale x-scale) (neg.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(neg.f64 (.f64 1 (.f64 (/.f64 y-scale x-scale) (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(neg.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 1))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(neg.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 (neg.f64 y-scale) x-scale)))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(neg.f64 (/.f64 (.f64 (/.f64 y-scale x-scale) (neg.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 1))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(sqrt.f64 (pow.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2))
(sqrt.f64 (pow.f64 (.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale)) 2))
(fabs.f64 (.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale)))
(log.f64 (pow.f64 (exp.f64 (/.f64 y-scale x-scale)) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(cbrt.f64 (pow.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 3))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(cbrt.f64 (/.f64 (pow.f64 (/.f64 y-scale x-scale) 3) (/.f64 1 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3))))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(expm1.f64 (log1p.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(exp.f64 (log.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(exp.f64 (.f64 (log.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 1))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(log1p.f64 (expm1.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(-.f64 (exp.f64 (log1p.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 1)
(/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(.f64 1 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(.f64 1 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 1)
(/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -1/2) (pow.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) -1/2))
(/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -1/2) (neg.f64 (/.f64 -1 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 (pow.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) -1/2) (/.f64 1 (sqrt.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) -2)))
(/.f64 (cbrt.f64 (pow.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) -2)) (cbrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (cbrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -2)) (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (cbrt.f64 (pow.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) -2)) (cbrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (cbrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -2)) (neg.f64 (/.f64 -1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(/.f64 (cbrt.f64 (pow.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) -2)) (cbrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 -1 (/.f64 -1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(.f64 (/.f64 -1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) -1)
(/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(.f64 (sqrt.f64 (/.f64 -1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (sqrt.f64 (/.f64 -1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(.f64 (.f64 (cbrt.f64 (/.f64 -1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (/.f64 -1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (neg.f64 (cbrt.f64 (/.f64 -1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(.f64 (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(.f64 (/.f64 -1 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 -1 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(.f64 (neg.f64 (cbrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -2))) (/.f64 -1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (cbrt.f64 (pow.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) -2)) (cbrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (pow.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) -1) (pow.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) -1))
(/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(.f64 (pow.f64 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) -1) (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) -1))
(/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(.f64 (/.f64 1 (/.f64 1 (cbrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -2)))) (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (cbrt.f64 (pow.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) -2)) (cbrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 1 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(.f64 (/.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -1/2) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (.f64 (pow.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) -1/2) (sqrt.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (sqrt.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (pow.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) -1/2)))
(.f64 (/.f64 -1 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(.f64 (/.f64 (/.f64 1 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 1 (.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (pow.f64 (cbrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))) (cbrt.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) -2) (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (cbrt.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 -1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (sqrt.f64 (/.f64 -1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(.f64 (neg.f64 (.f64 (cbrt.f64 (/.f64 -1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (/.f64 -1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (cbrt.f64 (/.f64 -1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(.f64 (neg.f64 (/.f64 -1 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (pow.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) -1/2))
(.f64 (pow.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) -1/2) (/.f64 1 (sqrt.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 (neg.f64 (neg.f64 (cbrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -2)))) (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (cbrt.f64 (pow.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) -2)) (cbrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(pow.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 1)
(/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(pow.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -1/2) 2)
(/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(pow.f64 (/.f64 1 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 3)
(/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(pow.f64 (/.f64 1 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)) 1/3)
(cbrt.f64 (/.f64 1 (pow.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))
(pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -1)
(/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(neg.f64 (/.f64 -1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(sqrt.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) -2))
(sqrt.f64 (pow.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) -2))
(fabs.f64 (/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(log.f64 (exp.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(log.f64 (+.f64 1 (expm1.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(cbrt.f64 (/.f64 1 (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)))
(cbrt.f64 (/.f64 1 (pow.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))
(expm1.f64 (log1p.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(exp.f64 (neg.f64 (log.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(exp.f64 (.f64 (log.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) -1))
(/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(exp.f64 (.f64 (neg.f64 (log.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 1))
(/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(log1p.f64 (expm1.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))

localize22.0ms (0%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	99.7%	(/.f64 x-scale (*.f64 angle (PI.f64)))
	99.6%	(*.f64 angle (PI.f64))
✓	99.4%	(.f64 1/180 (/.f64 y-scale (/.f64 x-scale (.f64 angle (PI.f64)))))
✓	92.2%	(/.f64 y-scale (/.f64 x-scale (*.f64 angle (PI.f64))))

Compiler

Compiled 71 to 26 computations (63.4% saved)

series7.0ms (0%)

Counts

3 → 72

Calls

24 calls:

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

rewrite140.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

1190×	`associate-/r/`
1008×	`unswap-sqr`
984×	`swap-sqr`
536×	`associate-/l/`
434×	`distribute-lft-neg-in`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	12	63
1	254	63
2	3491	63

Stop Event

1×	node limit

Counts

3 → 201

Calls

Call 1

Inputs
(/.f64 y-scale (/.f64 x-scale (*.f64 angle (PI.f64))))
(.f64 1/180 (/.f64 y-scale (/.f64 x-scale (.f64 angle (PI.f64)))))
(/.f64 x-scale (*.f64 angle (PI.f64)))

Outputs

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

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

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

simplify120.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

1176×	`distribute-rgt-in`
1168×	`distribute-lft-in`
932×	`associate-r`
820×	`*-commutative`
790×	`associate-l`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	480	6935
1	1418	6833
2	6158	6833

Stop Event

1×	node limit

Counts

273 → 246

Calls

Call 1

Inputs
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(-.f64 (exp.f64 (log1p.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle)))) 1)
(.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))
(.f64 (.f64 angle (PI.f64)) (/.f64 y-scale x-scale))
(.f64 (.f64 y-scale (*.f64 (/.f64 (PI.f64) x-scale) angle)) 1)
(.f64 1 (.f64 y-scale (*.f64 (/.f64 (PI.f64) x-scale) angle)))
(.f64 (sqrt.f64 y-scale) (.f64 (sqrt.f64 y-scale) (*.f64 (/.f64 (PI.f64) x-scale) angle)))
(.f64 (sqrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))) (sqrt.f64 (.f64 y-scale (*.f64 (/.f64 (PI.f64) x-scale) angle))))
(.f64 (pow.f64 (cbrt.f64 y-scale) 2) (.f64 (cbrt.f64 y-scale) (*.f64 (/.f64 (PI.f64) x-scale) angle)))
(.f64 (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))) (pow.f64 (cbrt.f64 (.f64 y-scale (*.f64 (/.f64 (PI.f64) x-scale) angle))) 2))
(.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))) 2) (cbrt.f64 (.f64 y-scale (*.f64 (/.f64 (PI.f64) x-scale) angle))))
(.f64 (/.f64 y-scale x-scale) (.f64 angle (PI.f64)))
(.f64 (.f64 (/.f64 (PI.f64) x-scale) angle) y-scale)
(.f64 (neg.f64 y-scale) (/.f64 (.f64 angle (PI.f64)) (neg.f64 x-scale)))
(.f64 (.f64 (/.f64 y-scale x-scale) (PI.f64)) angle)
(.f64 (.f64 (/.f64 y-scale x-scale) 1) (*.f64 angle (PI.f64)))
(.f64 (.f64 (/.f64 y-scale x-scale) (sqrt.f64 (.f64 angle (PI.f64)))) (sqrt.f64 (.f64 angle (PI.f64))))
(.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (cbrt.f64 (.f64 angle (PI.f64))) 2)) (cbrt.f64 (.f64 angle (PI.f64))))
(.f64 (/.f64 y-scale 1) (.f64 (/.f64 (PI.f64) x-scale) angle))
(.f64 (/.f64 y-scale (sqrt.f64 x-scale)) (/.f64 (.f64 angle (PI.f64)) (sqrt.f64 x-scale)))
(.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (.f64 angle (PI.f64)) (cbrt.f64 x-scale)))
(.f64 (/.f64 1 x-scale) (.f64 y-scale (*.f64 angle (PI.f64))))
(.f64 (/.f64 1 x-scale) (.f64 (/.f64 y-scale 1) (*.f64 angle (PI.f64))))
(.f64 (.f64 1 (sqrt.f64 (.f64 (/.f64 (PI.f64) x-scale) angle))) (/.f64 y-scale (sqrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2)) (/.f64 y-scale (cbrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64))))))
(.f64 (.f64 (/.f64 y-scale x-scale) angle) (PI.f64))
(.f64 (/.f64 y-scale (neg.f64 x-scale)) (.f64 (PI.f64) (neg.f64 angle)))
(.f64 (/.f64 1 (/.f64 x-scale angle)) (.f64 y-scale (PI.f64)))
(.f64 (/.f64 1 (neg.f64 x-scale)) (.f64 y-scale (*.f64 (PI.f64) (neg.f64 angle))))
(.f64 (/.f64 (sqrt.f64 y-scale) 1) (.f64 (/.f64 (sqrt.f64 y-scale) x-scale) (*.f64 angle (PI.f64))))
(.f64 (/.f64 (sqrt.f64 y-scale) x-scale) (.f64 (/.f64 (sqrt.f64 y-scale) 1) (*.f64 angle (PI.f64))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) 1) (/.f64 (cbrt.f64 y-scale) (/.f64 x-scale (.f64 angle (PI.f64)))))
(.f64 (.f64 (/.f64 (sqrt.f64 y-scale) x-scale) (*.f64 angle (PI.f64))) (sqrt.f64 y-scale))
(.f64 (/.f64 (sqrt.f64 y-scale) (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2)) (/.f64 (sqrt.f64 y-scale) (cbrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) x-scale) (.f64 (/.f64 (cbrt.f64 y-scale) (/.f64 1 angle)) (PI.f64)))
(.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (sqrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) (/.f64 (cbrt.f64 y-scale) (sqrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2)) (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))))
(.f64 (/.f64 (.f64 angle (PI.f64)) (neg.f64 x-scale)) (neg.f64 y-scale))
(.f64 (/.f64 y-scale (/.f64 x-scale 1)) (.f64 angle (PI.f64)))
(*.f64 (/.f64 y-scale (/.f64 x-scale (PI.f64))) angle)
(.f64 (/.f64 y-scale (/.f64 x-scale (sqrt.f64 (.f64 angle (PI.f64))))) (sqrt.f64 (*.f64 angle (PI.f64))))
(.f64 (/.f64 y-scale (/.f64 x-scale (pow.f64 (cbrt.f64 (.f64 angle (PI.f64))) 2))) (cbrt.f64 (*.f64 angle (PI.f64))))
(.f64 (/.f64 y-scale (/.f64 x-scale (.f64 (sqrt.f64 (PI.f64)) angle))) (sqrt.f64 (PI.f64)))
(.f64 (/.f64 y-scale (/.f64 x-scale (.f64 (pow.f64 (cbrt.f64 (PI.f64)) 2) angle))) (cbrt.f64 (PI.f64)))
(.f64 (/.f64 y-scale -1) (/.f64 (.f64 angle (PI.f64)) (neg.f64 x-scale)))
(*.f64 (/.f64 y-scale (/.f64 x-scale (neg.f64 angle))) (neg.f64 (PI.f64)))
(.f64 (/.f64 1 (/.f64 (/.f64 x-scale angle) (.f64 (sqrt.f64 y-scale) (PI.f64)))) (sqrt.f64 y-scale))
(.f64 (/.f64 1 (/.f64 x-scale (.f64 (pow.f64 (cbrt.f64 y-scale) 2) (*.f64 angle (PI.f64))))) (cbrt.f64 y-scale))
(.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 x-scale (.f64 angle (PI.f64)))) (cbrt.f64 y-scale))
(.f64 (/.f64 (/.f64 y-scale x-scale) 1) (.f64 angle (PI.f64)))
(.f64 (/.f64 (/.f64 y-scale x-scale) 1) (/.f64 (.f64 angle (PI.f64)) 1))
(*.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 1 angle)) (PI.f64))
(*.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 1 (PI.f64))) angle)
(.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 1 (sqrt.f64 (.f64 angle (PI.f64))))) (sqrt.f64 (*.f64 angle (PI.f64))))
(.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 1 (pow.f64 (cbrt.f64 (.f64 angle (PI.f64))) 2))) (cbrt.f64 (*.f64 angle (PI.f64))))
(.f64 (/.f64 (/.f64 y-scale x-scale) -1) (.f64 (PI.f64) (neg.f64 angle)))
(.f64 (/.f64 (neg.f64 y-scale) -1) (.f64 (/.f64 (PI.f64) x-scale) angle))
(*.f64 (/.f64 (neg.f64 y-scale) (/.f64 x-scale (neg.f64 angle))) (PI.f64))
(.f64 (/.f64 (neg.f64 y-scale) x-scale) (.f64 (PI.f64) (neg.f64 angle)))
(.f64 (/.f64 (/.f64 y-scale 1) 1) (.f64 (/.f64 (PI.f64) x-scale) angle))
(.f64 (/.f64 (/.f64 y-scale 1) (sqrt.f64 x-scale)) (/.f64 (.f64 angle (PI.f64)) (sqrt.f64 x-scale)))
(.f64 (/.f64 (/.f64 y-scale 1) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (.f64 angle (PI.f64)) (cbrt.f64 x-scale)))
(*.f64 (/.f64 (/.f64 y-scale 1) (/.f64 x-scale angle)) (PI.f64))
(.f64 (/.f64 (/.f64 y-scale 1) (neg.f64 x-scale)) (.f64 (PI.f64) (neg.f64 angle)))
(.f64 (/.f64 (/.f64 y-scale 1) (/.f64 x-scale 1)) (.f64 angle (PI.f64)))
(*.f64 (/.f64 (/.f64 y-scale 1) (/.f64 x-scale (PI.f64))) angle)
(.f64 (/.f64 (/.f64 y-scale 1) (/.f64 x-scale (sqrt.f64 (.f64 angle (PI.f64))))) (sqrt.f64 (*.f64 angle (PI.f64))))
(.f64 (/.f64 (/.f64 y-scale 1) (/.f64 x-scale (pow.f64 (cbrt.f64 (.f64 angle (PI.f64))) 2))) (cbrt.f64 (*.f64 angle (PI.f64))))
(.f64 (/.f64 (/.f64 y-scale 1) (/.f64 x-scale (.f64 (sqrt.f64 (PI.f64)) angle))) (sqrt.f64 (PI.f64)))
(.f64 (/.f64 (/.f64 y-scale 1) (/.f64 x-scale (.f64 (pow.f64 (cbrt.f64 (PI.f64)) 2) angle))) (cbrt.f64 (PI.f64)))
(.f64 (/.f64 (/.f64 y-scale 1) -1) (/.f64 (.f64 angle (PI.f64)) (neg.f64 x-scale)))
(*.f64 (/.f64 (/.f64 y-scale 1) (/.f64 x-scale (neg.f64 angle))) (neg.f64 (PI.f64)))
(.f64 (/.f64 (/.f64 y-scale (sqrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) 1) (sqrt.f64 (*.f64 (/.f64 (PI.f64) x-scale) angle)))
(.f64 (/.f64 (/.f64 y-scale (sqrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) (sqrt.f64 x-scale)) (sqrt.f64 (*.f64 angle (PI.f64))))
(.f64 (/.f64 (/.f64 y-scale (sqrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) (sqrt.f64 (neg.f64 x-scale))) (sqrt.f64 (*.f64 (PI.f64) (neg.f64 angle))))
(.f64 (/.f64 (/.f64 y-scale (sqrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) (sqrt.f64 (/.f64 x-scale angle))) (sqrt.f64 (PI.f64)))
(.f64 (/.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2)) 1) (cbrt.f64 (*.f64 (/.f64 (PI.f64) x-scale) angle)))
(.f64 (/.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2)) (cbrt.f64 x-scale)) (cbrt.f64 (*.f64 angle (PI.f64))))
(.f64 (/.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2)) (cbrt.f64 (neg.f64 x-scale))) (cbrt.f64 (*.f64 (PI.f64) (neg.f64 angle))))
(.f64 (/.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2)) (cbrt.f64 (/.f64 x-scale angle))) (cbrt.f64 (PI.f64)))
(.f64 (.f64 (sqrt.f64 y-scale) (/.f64 (sqrt.f64 (.f64 angle (PI.f64))) (sqrt.f64 x-scale))) (.f64 (sqrt.f64 y-scale) (/.f64 (sqrt.f64 (*.f64 angle (PI.f64))) (sqrt.f64 x-scale))))
(.f64 (.f64 (sqrt.f64 (.f64 angle (PI.f64))) (sqrt.f64 (/.f64 y-scale x-scale))) (.f64 (sqrt.f64 (*.f64 angle (PI.f64))) (sqrt.f64 (/.f64 y-scale x-scale))))
(.f64 (.f64 (sqrt.f64 (.f64 angle (PI.f64))) (/.f64 (sqrt.f64 y-scale) (sqrt.f64 x-scale))) (.f64 (sqrt.f64 (*.f64 angle (PI.f64))) (/.f64 (sqrt.f64 y-scale) (sqrt.f64 x-scale))))
(.f64 (.f64 (sqrt.f64 (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle)))) (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle)))) (.f64 (sqrt.f64 (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle)))) (cbrt.f64 (.f64 y-scale (*.f64 (/.f64 (PI.f64) x-scale) angle)))))
(.f64 (.f64 (cbrt.f64 (sqrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle)))) (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle)))) (.f64 (cbrt.f64 (sqrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle)))) (cbrt.f64 (.f64 y-scale (*.f64 (/.f64 (PI.f64) x-scale) angle)))))
(.f64 (.f64 (sqrt.f64 (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle)))) (sqrt.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))) 2))) (.f64 (sqrt.f64 (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle)))) (sqrt.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (*.f64 (/.f64 (PI.f64) x-scale) angle))) 2))))
(.f64 (.f64 (cbrt.f64 (sqrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle)))) (sqrt.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))) 2))) (.f64 (cbrt.f64 (sqrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle)))) (sqrt.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (*.f64 (/.f64 (PI.f64) x-scale) angle))) 2))))
(.f64 (.f64 (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))) (sqrt.f64 (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))))) (.f64 (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))) (sqrt.f64 (cbrt.f64 (.f64 y-scale (*.f64 (/.f64 (PI.f64) x-scale) angle))))))
(.f64 (.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))) 2)) (cbrt.f64 (sqrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))))) (.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))) 2)) (cbrt.f64 (sqrt.f64 (.f64 y-scale (*.f64 (/.f64 (PI.f64) x-scale) angle))))))
(.f64 (.f64 (sqrt.f64 (.f64 (/.f64 (PI.f64) x-scale) angle)) (sqrt.f64 y-scale)) (.f64 (sqrt.f64 (*.f64 (/.f64 (PI.f64) x-scale) angle)) (sqrt.f64 y-scale)))
(.f64 (.f64 (/.f64 (sqrt.f64 (.f64 angle (PI.f64))) (sqrt.f64 x-scale)) (sqrt.f64 y-scale)) (.f64 (/.f64 (sqrt.f64 (*.f64 angle (PI.f64))) (sqrt.f64 x-scale)) (sqrt.f64 y-scale)))
(pow.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle)) 1)
(pow.f64 (sqrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))) 2)
(pow.f64 (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))) 3)
(pow.f64 (pow.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle)) 3) 1/3)
(pow.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) -1)
(neg.f64 (.f64 (/.f64 y-scale (neg.f64 x-scale)) (.f64 angle (PI.f64))))
(neg.f64 (.f64 y-scale (/.f64 (.f64 angle (PI.f64)) (neg.f64 x-scale))))
(neg.f64 (.f64 (.f64 (/.f64 y-scale (neg.f64 x-scale)) (*.f64 angle (PI.f64))) 1))
(neg.f64 (.f64 1 (.f64 (/.f64 y-scale (neg.f64 x-scale)) (*.f64 angle (PI.f64)))))
(neg.f64 (/.f64 (neg.f64 y-scale) (/.f64 x-scale (*.f64 angle (PI.f64)))))
(sqrt.f64 (pow.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle)) 2))
(log.f64 (pow.f64 (exp.f64 y-scale) (*.f64 (/.f64 (PI.f64) x-scale) angle)))
(log.f64 (+.f64 1 (expm1.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle)))))
(cbrt.f64 (pow.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle)) 3))
(cbrt.f64 (/.f64 (pow.f64 y-scale 3) (pow.f64 (/.f64 x-scale (*.f64 angle (PI.f64))) 3)))
(expm1.f64 (log1p.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))))
(exp.f64 (log.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))))
(exp.f64 (.f64 (log.f64 (.f64 y-scale (*.f64 (/.f64 (PI.f64) x-scale) angle))) 1))
(log1p.f64 (expm1.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))))
(-.f64 (exp.f64 (log1p.f64 (.f64 y-scale (.f64 (*.f64 (/.f64 (PI.f64) x-scale) angle) 1/180)))) 1)
(/.f64 1/180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))
(/.f64 1 (/.f64 (/.f64 x-scale (.f64 angle (PI.f64))) (.f64 y-scale 1/180)))
(/.f64 (.f64 y-scale 1/180) (/.f64 x-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 (.f64 y-scale 1/180) x-scale) (/.f64 1 (.f64 angle (PI.f64))))
(/.f64 (/.f64 (.f64 y-scale 1/180) 1) (/.f64 x-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 (.f64 y-scale 1/180) (sqrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) (sqrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))))
(/.f64 (/.f64 (.f64 y-scale 1/180) (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2)) (cbrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))))
(/.f64 (.f64 y-scale -1/180) (/.f64 (neg.f64 x-scale) (.f64 angle (PI.f64))))
(pow.f64 (.f64 y-scale (.f64 (*.f64 (/.f64 (PI.f64) x-scale) angle) 1/180)) 1)
(pow.f64 (sqrt.f64 (.f64 y-scale (.f64 (*.f64 (/.f64 (PI.f64) x-scale) angle) 1/180))) 2)
(pow.f64 (cbrt.f64 (.f64 y-scale (.f64 (*.f64 (/.f64 (PI.f64) x-scale) angle) 1/180))) 3)
(pow.f64 (pow.f64 (.f64 y-scale (.f64 (*.f64 (/.f64 (PI.f64) x-scale) angle) 1/180)) 3) 1/3)
(neg.f64 (.f64 (.f64 (/.f64 y-scale (neg.f64 x-scale)) (*.f64 angle (PI.f64))) 1/180))
(neg.f64 (.f64 1/180 (.f64 (/.f64 y-scale (neg.f64 x-scale)) (*.f64 angle (PI.f64)))))
(neg.f64 (.f64 (/.f64 (.f64 y-scale 1/180) (neg.f64 x-scale)) (*.f64 angle (PI.f64))))
(neg.f64 (/.f64 (.f64 y-scale 1/180) (/.f64 (neg.f64 x-scale) (.f64 angle (PI.f64)))))
(sqrt.f64 (.f64 1/32400 (pow.f64 (.f64 y-scale (*.f64 (/.f64 (PI.f64) x-scale) angle)) 2)))
(log.f64 (pow.f64 (exp.f64 1/180) (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))))
(log.f64 (+.f64 1 (expm1.f64 (.f64 y-scale (.f64 (*.f64 (/.f64 (PI.f64) x-scale) angle) 1/180)))))
(cbrt.f64 (pow.f64 (.f64 y-scale (.f64 (*.f64 (/.f64 (PI.f64) x-scale) angle) 1/180)) 3))
(expm1.f64 (log1p.f64 (.f64 y-scale (.f64 (*.f64 (/.f64 (PI.f64) x-scale) angle) 1/180))))
(exp.f64 (log.f64 (.f64 y-scale (.f64 (*.f64 (/.f64 (PI.f64) x-scale) angle) 1/180))))
(exp.f64 (.f64 (log.f64 (.f64 y-scale (.f64 (.f64 (/.f64 (PI.f64) x-scale) angle) 1/180))) 1))
(log1p.f64 (expm1.f64 (.f64 y-scale (.f64 (*.f64 (/.f64 (PI.f64) x-scale) angle) 1/180))))
(-.f64 (exp.f64 (log1p.f64 (/.f64 x-scale (*.f64 angle (PI.f64))))) 1)
(.f64 x-scale (/.f64 1 (.f64 angle (PI.f64))))
(.f64 x-scale (neg.f64 (/.f64 -1 (.f64 angle (PI.f64)))))
(.f64 (/.f64 x-scale (.f64 angle (PI.f64))) 1)
(.f64 1 (/.f64 x-scale (.f64 angle (PI.f64))))
(.f64 (sqrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) (sqrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))))
(.f64 (sqrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) (neg.f64 (neg.f64 (sqrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))))))
(.f64 (sqrt.f64 x-scale) (.f64 (sqrt.f64 x-scale) (/.f64 1 (*.f64 angle (PI.f64)))))
(.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) (pow.f64 (cbrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))) 2))
(.f64 (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2) (cbrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))))
(.f64 (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2) (neg.f64 (neg.f64 (cbrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))))))
(.f64 (pow.f64 (cbrt.f64 x-scale) 2) (.f64 (cbrt.f64 x-scale) (/.f64 1 (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 x-scale angle) (/.f64 1 (PI.f64)))
(.f64 (/.f64 1 (.f64 angle (PI.f64))) x-scale)
(.f64 (neg.f64 x-scale) (/.f64 -1 (.f64 angle (PI.f64))))
(.f64 (sqrt.f64 (/.f64 (neg.f64 x-scale) (.f64 angle (PI.f64)))) (neg.f64 (sqrt.f64 (/.f64 (neg.f64 x-scale) (*.f64 angle (PI.f64))))))
(.f64 (.f64 (cbrt.f64 (/.f64 (neg.f64 x-scale) (.f64 angle (PI.f64)))) (cbrt.f64 (/.f64 (neg.f64 x-scale) (.f64 angle (PI.f64))))) (neg.f64 (cbrt.f64 (/.f64 (neg.f64 x-scale) (*.f64 angle (PI.f64))))))
(*.f64 (/.f64 1 angle) (/.f64 x-scale (PI.f64)))
(*.f64 (/.f64 1 (PI.f64)) (/.f64 x-scale angle))
(.f64 (/.f64 1 (sqrt.f64 (.f64 angle (PI.f64)))) (/.f64 x-scale (sqrt.f64 (*.f64 angle (PI.f64)))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (.f64 angle (PI.f64))) 2)) (/.f64 x-scale (cbrt.f64 (*.f64 angle (PI.f64)))))
(.f64 -1 (/.f64 (neg.f64 x-scale) (.f64 angle (PI.f64))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) (neg.f64 (sqrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64))))))
(.f64 (neg.f64 (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2)) (neg.f64 (cbrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64))))))
(.f64 (/.f64 -1 (.f64 angle (PI.f64))) (neg.f64 x-scale))
(.f64 (/.f64 (sqrt.f64 x-scale) 1) (/.f64 (sqrt.f64 x-scale) (.f64 angle (PI.f64))))
(*.f64 (/.f64 (sqrt.f64 x-scale) angle) (/.f64 (sqrt.f64 x-scale) (PI.f64)))
(.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) 1) (/.f64 (cbrt.f64 x-scale) (.f64 angle (PI.f64))))
(*.f64 (/.f64 (sqrt.f64 x-scale) (PI.f64)) (/.f64 (sqrt.f64 x-scale) angle))
(.f64 (/.f64 (sqrt.f64 x-scale) (.f64 angle (PI.f64))) (sqrt.f64 x-scale))
(.f64 (/.f64 (sqrt.f64 x-scale) (pow.f64 (cbrt.f64 (.f64 angle (PI.f64))) 2)) (/.f64 (sqrt.f64 x-scale) (cbrt.f64 (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) angle) (/.f64 (cbrt.f64 x-scale) (PI.f64)))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (PI.f64)) (/.f64 (cbrt.f64 x-scale) angle))
(.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (sqrt.f64 (.f64 angle (PI.f64)))) (/.f64 (cbrt.f64 x-scale) (sqrt.f64 (*.f64 angle (PI.f64)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (pow.f64 (cbrt.f64 (.f64 angle (PI.f64))) 2)) (cbrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))))
(.f64 (/.f64 1 (/.f64 (.f64 angle (PI.f64)) (sqrt.f64 x-scale))) (sqrt.f64 x-scale))
(.f64 (/.f64 1 (/.f64 (.f64 angle (PI.f64)) (pow.f64 (cbrt.f64 x-scale) 2))) (cbrt.f64 x-scale))
(.f64 (/.f64 1 (/.f64 1 x-scale)) (/.f64 1 (.f64 angle (PI.f64))))
(.f64 (/.f64 1 (/.f64 1 (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2))) (cbrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (.f64 angle (PI.f64))) (cbrt.f64 x-scale))
(.f64 (neg.f64 (sqrt.f64 (/.f64 (neg.f64 x-scale) (.f64 angle (PI.f64))))) (sqrt.f64 (/.f64 (neg.f64 x-scale) (*.f64 angle (PI.f64)))))
(.f64 (neg.f64 (.f64 (cbrt.f64 (/.f64 (neg.f64 x-scale) (.f64 angle (PI.f64)))) (cbrt.f64 (/.f64 (neg.f64 x-scale) (.f64 angle (PI.f64)))))) (cbrt.f64 (/.f64 (neg.f64 x-scale) (*.f64 angle (PI.f64)))))
(.f64 (neg.f64 (neg.f64 (sqrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))))
(.f64 (neg.f64 (neg.f64 (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2))) (cbrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))))
(.f64 (.f64 (sqrt.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) (.f64 (sqrt.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) (cbrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64))))))
(.f64 (.f64 (cbrt.f64 (sqrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) (.f64 (cbrt.f64 (sqrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) (cbrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64))))))
(.f64 (.f64 (sqrt.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) (sqrt.f64 (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2))) (.f64 (sqrt.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) (sqrt.f64 (pow.f64 (cbrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))) 2))))
(.f64 (.f64 (cbrt.f64 (sqrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) (sqrt.f64 (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2))) (.f64 (cbrt.f64 (sqrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) (sqrt.f64 (pow.f64 (cbrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))) 2))))
(.f64 (.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) (sqrt.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))))) (.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) (sqrt.f64 (cbrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))))))
(.f64 (.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2)) (cbrt.f64 (sqrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))))) (.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2)) (cbrt.f64 (sqrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))))))
(.f64 (.f64 (sqrt.f64 (/.f64 1 (.f64 angle (PI.f64)))) (sqrt.f64 x-scale)) (.f64 (sqrt.f64 (/.f64 1 (*.f64 angle (PI.f64)))) (sqrt.f64 x-scale)))
(pow.f64 (/.f64 x-scale (*.f64 angle (PI.f64))) 1)
(pow.f64 (sqrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))) 2)
(pow.f64 (cbrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))) 3)
(pow.f64 (pow.f64 (/.f64 x-scale (*.f64 angle (PI.f64))) 3) 1/3)
(pow.f64 (*.f64 (/.f64 (PI.f64) x-scale) angle) -1)
(neg.f64 (/.f64 (neg.f64 x-scale) (*.f64 angle (PI.f64))))
(neg.f64 (/.f64 (/.f64 (neg.f64 x-scale) (*.f64 angle (PI.f64))) 1))
(sqrt.f64 (pow.f64 (/.f64 x-scale (*.f64 angle (PI.f64))) 2))
(log.f64 (exp.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))))
(log.f64 (+.f64 1 (expm1.f64 (/.f64 x-scale (*.f64 angle (PI.f64))))))
(cbrt.f64 (pow.f64 (/.f64 x-scale (*.f64 angle (PI.f64))) 3))
(cbrt.f64 (/.f64 (pow.f64 x-scale 3) (pow.f64 (*.f64 angle (PI.f64)) 3)))
(expm1.f64 (log1p.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))))
(exp.f64 (log.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))))
(exp.f64 (.f64 (log.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 1))
(log1p.f64 (expm1.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))))

Outputs
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(-.f64 (exp.f64 (log1p.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle)))) 1)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (.f64 angle (PI.f64)) (/.f64 y-scale x-scale))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (.f64 y-scale (*.f64 (/.f64 (PI.f64) x-scale) angle)) 1)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 1 (.f64 y-scale (*.f64 (/.f64 (PI.f64) x-scale) angle)))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (sqrt.f64 y-scale) (.f64 (sqrt.f64 y-scale) (*.f64 (/.f64 (PI.f64) x-scale) angle)))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (sqrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))) (sqrt.f64 (.f64 y-scale (*.f64 (/.f64 (PI.f64) x-scale) angle))))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (pow.f64 (cbrt.f64 y-scale) 2) (.f64 (cbrt.f64 y-scale) (*.f64 (/.f64 (PI.f64) x-scale) angle)))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))) (pow.f64 (cbrt.f64 (.f64 y-scale (*.f64 (/.f64 (PI.f64) x-scale) angle))) 2))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))) 2) (cbrt.f64 (.f64 y-scale (*.f64 (/.f64 (PI.f64) x-scale) angle))))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 y-scale x-scale) (.f64 angle (PI.f64)))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (.f64 (/.f64 (PI.f64) x-scale) angle) y-scale)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (neg.f64 y-scale) (/.f64 (.f64 angle (PI.f64)) (neg.f64 x-scale)))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (.f64 (/.f64 y-scale x-scale) (PI.f64)) angle)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (.f64 (/.f64 y-scale x-scale) 1) (*.f64 angle (PI.f64)))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (.f64 (/.f64 y-scale x-scale) (sqrt.f64 (.f64 angle (PI.f64)))) (sqrt.f64 (.f64 angle (PI.f64))))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (cbrt.f64 (.f64 angle (PI.f64))) 2)) (cbrt.f64 (.f64 angle (PI.f64))))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 y-scale 1) (.f64 (/.f64 (PI.f64) x-scale) angle))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 y-scale (sqrt.f64 x-scale)) (/.f64 (.f64 angle (PI.f64)) (sqrt.f64 x-scale)))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (.f64 angle (PI.f64)) (cbrt.f64 x-scale)))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 1 x-scale) (.f64 y-scale (*.f64 angle (PI.f64))))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 1 x-scale) (.f64 (/.f64 y-scale 1) (*.f64 angle (PI.f64))))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (.f64 1 (sqrt.f64 (.f64 (/.f64 (PI.f64) x-scale) angle))) (/.f64 y-scale (sqrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))))
(.f64 (sqrt.f64 (.f64 angle (/.f64 (PI.f64) x-scale))) (/.f64 y-scale (sqrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(/.f64 (sqrt.f64 (*.f64 angle (/.f64 (PI.f64) x-scale))) (/.f64 (sqrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64))) y-scale))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2)) (/.f64 y-scale (cbrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64))))))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (.f64 (/.f64 y-scale x-scale) angle) (PI.f64))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 y-scale (neg.f64 x-scale)) (.f64 (PI.f64) (neg.f64 angle)))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 1 (/.f64 x-scale angle)) (.f64 y-scale (PI.f64)))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 1 (neg.f64 x-scale)) (.f64 y-scale (*.f64 (PI.f64) (neg.f64 angle))))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 (sqrt.f64 y-scale) 1) (.f64 (/.f64 (sqrt.f64 y-scale) x-scale) (*.f64 angle (PI.f64))))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 (sqrt.f64 y-scale) x-scale) (.f64 (/.f64 (sqrt.f64 y-scale) 1) (*.f64 angle (PI.f64))))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) 1) (/.f64 (cbrt.f64 y-scale) (/.f64 x-scale (.f64 angle (PI.f64)))))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (.f64 (/.f64 (sqrt.f64 y-scale) x-scale) (*.f64 angle (PI.f64))) (sqrt.f64 y-scale))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 (sqrt.f64 y-scale) (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2)) (/.f64 (sqrt.f64 y-scale) (cbrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64))))))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) x-scale) (.f64 (/.f64 (cbrt.f64 y-scale) (/.f64 1 angle)) (PI.f64)))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (sqrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) (/.f64 (cbrt.f64 y-scale) (sqrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64))))))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2)) (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))))
(/.f64 (.f64 (pow.f64 (cbrt.f64 y-scale) 2) (cbrt.f64 (.f64 (/.f64 (PI.f64) x-scale) (*.f64 angle y-scale)))) (pow.f64 (cbrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64))) 2))
(.f64 (cbrt.f64 (.f64 (PI.f64) (*.f64 y-scale (/.f64 angle x-scale)))) (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (pow.f64 (cbrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64))) 2)))
(.f64 (/.f64 (.f64 angle (PI.f64)) (neg.f64 x-scale)) (neg.f64 y-scale))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 y-scale (/.f64 x-scale 1)) (.f64 angle (PI.f64)))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(*.f64 (/.f64 y-scale (/.f64 x-scale (PI.f64))) angle)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 y-scale (/.f64 x-scale (sqrt.f64 (.f64 angle (PI.f64))))) (sqrt.f64 (*.f64 angle (PI.f64))))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 y-scale (/.f64 x-scale (pow.f64 (cbrt.f64 (.f64 angle (PI.f64))) 2))) (cbrt.f64 (*.f64 angle (PI.f64))))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 y-scale (/.f64 x-scale (.f64 (sqrt.f64 (PI.f64)) angle))) (sqrt.f64 (PI.f64)))
(.f64 (sqrt.f64 (PI.f64)) (.f64 (/.f64 y-scale x-scale) (*.f64 angle (sqrt.f64 (PI.f64)))))
(/.f64 (*.f64 y-scale (sqrt.f64 (PI.f64))) (/.f64 (/.f64 x-scale angle) (sqrt.f64 (PI.f64))))
(.f64 (/.f64 y-scale (/.f64 x-scale (.f64 (pow.f64 (cbrt.f64 (PI.f64)) 2) angle))) (cbrt.f64 (PI.f64)))
(.f64 (cbrt.f64 (PI.f64)) (.f64 (/.f64 y-scale x-scale) (*.f64 angle (pow.f64 (cbrt.f64 (PI.f64)) 2))))
(/.f64 (*.f64 y-scale (cbrt.f64 (PI.f64))) (/.f64 (/.f64 x-scale angle) (pow.f64 (cbrt.f64 (PI.f64)) 2)))
(.f64 (/.f64 y-scale -1) (/.f64 (.f64 angle (PI.f64)) (neg.f64 x-scale)))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(*.f64 (/.f64 y-scale (/.f64 x-scale (neg.f64 angle))) (neg.f64 (PI.f64)))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 1 (/.f64 (/.f64 x-scale angle) (.f64 (sqrt.f64 y-scale) (PI.f64)))) (sqrt.f64 y-scale))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 1 (/.f64 x-scale (.f64 (pow.f64 (cbrt.f64 y-scale) 2) (*.f64 angle (PI.f64))))) (cbrt.f64 y-scale))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 x-scale (.f64 angle (PI.f64)))) (cbrt.f64 y-scale))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 (/.f64 y-scale x-scale) 1) (.f64 angle (PI.f64)))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 (/.f64 y-scale x-scale) 1) (/.f64 (.f64 angle (PI.f64)) 1))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(*.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 1 angle)) (PI.f64))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(*.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 1 (PI.f64))) angle)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 1 (sqrt.f64 (.f64 angle (PI.f64))))) (sqrt.f64 (*.f64 angle (PI.f64))))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 1 (pow.f64 (cbrt.f64 (.f64 angle (PI.f64))) 2))) (cbrt.f64 (*.f64 angle (PI.f64))))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 (/.f64 y-scale x-scale) -1) (.f64 (PI.f64) (neg.f64 angle)))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 (neg.f64 y-scale) -1) (.f64 (/.f64 (PI.f64) x-scale) angle))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(*.f64 (/.f64 (neg.f64 y-scale) (/.f64 x-scale (neg.f64 angle))) (PI.f64))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 (neg.f64 y-scale) x-scale) (.f64 (PI.f64) (neg.f64 angle)))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 (/.f64 y-scale 1) 1) (.f64 (/.f64 (PI.f64) x-scale) angle))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 (/.f64 y-scale 1) (sqrt.f64 x-scale)) (/.f64 (.f64 angle (PI.f64)) (sqrt.f64 x-scale)))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 (/.f64 y-scale 1) (pow.f64 (cbrt.f64 x-scale) 2)) (/.f64 (.f64 angle (PI.f64)) (cbrt.f64 x-scale)))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(*.f64 (/.f64 (/.f64 y-scale 1) (/.f64 x-scale angle)) (PI.f64))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 (/.f64 y-scale 1) (neg.f64 x-scale)) (.f64 (PI.f64) (neg.f64 angle)))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 (/.f64 y-scale 1) (/.f64 x-scale 1)) (.f64 angle (PI.f64)))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(*.f64 (/.f64 (/.f64 y-scale 1) (/.f64 x-scale (PI.f64))) angle)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 (/.f64 y-scale 1) (/.f64 x-scale (sqrt.f64 (.f64 angle (PI.f64))))) (sqrt.f64 (*.f64 angle (PI.f64))))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 (/.f64 y-scale 1) (/.f64 x-scale (pow.f64 (cbrt.f64 (.f64 angle (PI.f64))) 2))) (cbrt.f64 (*.f64 angle (PI.f64))))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 (/.f64 y-scale 1) (/.f64 x-scale (.f64 (sqrt.f64 (PI.f64)) angle))) (sqrt.f64 (PI.f64)))
(.f64 (sqrt.f64 (PI.f64)) (.f64 (/.f64 y-scale x-scale) (*.f64 angle (sqrt.f64 (PI.f64)))))
(/.f64 (*.f64 y-scale (sqrt.f64 (PI.f64))) (/.f64 (/.f64 x-scale angle) (sqrt.f64 (PI.f64))))
(.f64 (/.f64 (/.f64 y-scale 1) (/.f64 x-scale (.f64 (pow.f64 (cbrt.f64 (PI.f64)) 2) angle))) (cbrt.f64 (PI.f64)))
(.f64 (cbrt.f64 (PI.f64)) (.f64 (/.f64 y-scale x-scale) (*.f64 angle (pow.f64 (cbrt.f64 (PI.f64)) 2))))
(/.f64 (*.f64 y-scale (cbrt.f64 (PI.f64))) (/.f64 (/.f64 x-scale angle) (pow.f64 (cbrt.f64 (PI.f64)) 2)))
(.f64 (/.f64 (/.f64 y-scale 1) -1) (/.f64 (.f64 angle (PI.f64)) (neg.f64 x-scale)))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(*.f64 (/.f64 (/.f64 y-scale 1) (/.f64 x-scale (neg.f64 angle))) (neg.f64 (PI.f64)))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (/.f64 (/.f64 y-scale (sqrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) 1) (sqrt.f64 (*.f64 (/.f64 (PI.f64) x-scale) angle)))
(.f64 (sqrt.f64 (.f64 angle (/.f64 (PI.f64) x-scale))) (/.f64 y-scale (sqrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(/.f64 (sqrt.f64 (*.f64 angle (/.f64 (PI.f64) x-scale))) (/.f64 (sqrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64))) y-scale))
(.f64 (/.f64 (/.f64 y-scale (sqrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) (sqrt.f64 x-scale)) (sqrt.f64 (*.f64 angle (PI.f64))))
(.f64 (sqrt.f64 (.f64 angle (PI.f64))) (/.f64 y-scale (*.f64 (sqrt.f64 x-scale) (sqrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64))))))
(.f64 (/.f64 (/.f64 y-scale (sqrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) (sqrt.f64 (neg.f64 x-scale))) (sqrt.f64 (*.f64 (PI.f64) (neg.f64 angle))))
(.f64 (/.f64 y-scale (.f64 (sqrt.f64 (neg.f64 x-scale)) (sqrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64))))) (sqrt.f64 (*.f64 (PI.f64) (neg.f64 angle))))
(.f64 (/.f64 y-scale (.f64 (sqrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64))) (sqrt.f64 (neg.f64 x-scale)))) (sqrt.f64 (*.f64 angle (neg.f64 (PI.f64)))))
(.f64 (/.f64 (/.f64 y-scale (sqrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) (sqrt.f64 (/.f64 x-scale angle))) (sqrt.f64 (PI.f64)))
(.f64 (sqrt.f64 (PI.f64)) (/.f64 y-scale (.f64 (sqrt.f64 (/.f64 x-scale angle)) (sqrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64))))))
(/.f64 (/.f64 y-scale (sqrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64)))) (/.f64 (sqrt.f64 (/.f64 x-scale angle)) (sqrt.f64 (PI.f64))))
(.f64 (/.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2)) 1) (cbrt.f64 (*.f64 (/.f64 (PI.f64) x-scale) angle)))
(.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64))) 2)) (cbrt.f64 (.f64 angle (/.f64 (PI.f64) x-scale))))
(.f64 (/.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2)) (cbrt.f64 x-scale)) (cbrt.f64 (*.f64 angle (PI.f64))))
(.f64 (cbrt.f64 (.f64 angle (PI.f64))) (/.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64))) 2)) (cbrt.f64 x-scale)))
(/.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64))) 2)) (/.f64 (cbrt.f64 x-scale) (cbrt.f64 (*.f64 angle (PI.f64)))))
(.f64 (/.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2)) (cbrt.f64 (neg.f64 x-scale))) (cbrt.f64 (*.f64 (PI.f64) (neg.f64 angle))))
(.f64 (/.f64 y-scale (.f64 (cbrt.f64 (neg.f64 x-scale)) (pow.f64 (cbrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64))) 2))) (cbrt.f64 (*.f64 (PI.f64) (neg.f64 angle))))
(.f64 (/.f64 y-scale (.f64 (pow.f64 (cbrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64))) 2) (cbrt.f64 (neg.f64 x-scale)))) (cbrt.f64 (*.f64 angle (neg.f64 (PI.f64)))))
(.f64 (/.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2)) (cbrt.f64 (/.f64 x-scale angle))) (cbrt.f64 (PI.f64)))
(*.f64 (cbrt.f64 (PI.f64)) (/.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64))) 2)) (cbrt.f64 (/.f64 x-scale angle))))
(/.f64 (/.f64 (*.f64 y-scale (cbrt.f64 (PI.f64))) (pow.f64 (cbrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64))) 2)) (cbrt.f64 (/.f64 x-scale angle)))
(.f64 (.f64 (sqrt.f64 y-scale) (/.f64 (sqrt.f64 (.f64 angle (PI.f64))) (sqrt.f64 x-scale))) (.f64 (sqrt.f64 y-scale) (/.f64 (sqrt.f64 (*.f64 angle (PI.f64))) (sqrt.f64 x-scale))))
(.f64 (sqrt.f64 y-scale) (.f64 (/.f64 (sqrt.f64 (.f64 angle (PI.f64))) (sqrt.f64 x-scale)) (.f64 (sqrt.f64 y-scale) (/.f64 (sqrt.f64 (*.f64 angle (PI.f64))) (sqrt.f64 x-scale)))))
(.f64 (.f64 angle (PI.f64)) (*.f64 (/.f64 (sqrt.f64 y-scale) (sqrt.f64 x-scale)) (/.f64 (sqrt.f64 y-scale) (sqrt.f64 x-scale))))
(.f64 (.f64 (sqrt.f64 (.f64 angle (PI.f64))) (sqrt.f64 (/.f64 y-scale x-scale))) (.f64 (sqrt.f64 (*.f64 angle (PI.f64))) (sqrt.f64 (/.f64 y-scale x-scale))))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (.f64 (sqrt.f64 (.f64 angle (PI.f64))) (/.f64 (sqrt.f64 y-scale) (sqrt.f64 x-scale))) (.f64 (sqrt.f64 (*.f64 angle (PI.f64))) (/.f64 (sqrt.f64 y-scale) (sqrt.f64 x-scale))))
(.f64 (sqrt.f64 y-scale) (.f64 (/.f64 (sqrt.f64 (.f64 angle (PI.f64))) (sqrt.f64 x-scale)) (.f64 (sqrt.f64 y-scale) (/.f64 (sqrt.f64 (*.f64 angle (PI.f64))) (sqrt.f64 x-scale)))))
(.f64 (.f64 angle (PI.f64)) (*.f64 (/.f64 (sqrt.f64 y-scale) (sqrt.f64 x-scale)) (/.f64 (sqrt.f64 y-scale) (sqrt.f64 x-scale))))
(.f64 (.f64 (sqrt.f64 (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle)))) (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle)))) (.f64 (sqrt.f64 (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle)))) (cbrt.f64 (.f64 y-scale (*.f64 (/.f64 (PI.f64) x-scale) angle)))))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (.f64 (cbrt.f64 (sqrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle)))) (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle)))) (.f64 (cbrt.f64 (sqrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle)))) (cbrt.f64 (.f64 y-scale (*.f64 (/.f64 (PI.f64) x-scale) angle)))))
(.f64 (.f64 (cbrt.f64 (sqrt.f64 (.f64 (/.f64 (PI.f64) x-scale) (.f64 angle y-scale)))) (cbrt.f64 (sqrt.f64 (.f64 (/.f64 (PI.f64) x-scale) (.f64 angle y-scale))))) (pow.f64 (cbrt.f64 (.f64 (/.f64 (PI.f64) x-scale) (.f64 angle y-scale))) 2))
(.f64 (cbrt.f64 (sqrt.f64 (.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale))))) (.f64 (cbrt.f64 (sqrt.f64 (.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale))))) (pow.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))) 2)))
(.f64 (.f64 (sqrt.f64 (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle)))) (sqrt.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))) 2))) (.f64 (sqrt.f64 (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle)))) (sqrt.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (*.f64 (/.f64 (PI.f64) x-scale) angle))) 2))))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (.f64 (cbrt.f64 (sqrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle)))) (sqrt.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))) 2))) (.f64 (cbrt.f64 (sqrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle)))) (sqrt.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (*.f64 (/.f64 (PI.f64) x-scale) angle))) 2))))
(.f64 (.f64 (cbrt.f64 (sqrt.f64 (.f64 (/.f64 (PI.f64) x-scale) (.f64 angle y-scale)))) (cbrt.f64 (sqrt.f64 (.f64 (/.f64 (PI.f64) x-scale) (.f64 angle y-scale))))) (pow.f64 (cbrt.f64 (.f64 (/.f64 (PI.f64) x-scale) (.f64 angle y-scale))) 2))
(.f64 (cbrt.f64 (sqrt.f64 (.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale))))) (.f64 (cbrt.f64 (sqrt.f64 (.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale))))) (pow.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))) 2)))
(.f64 (.f64 (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))) (sqrt.f64 (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))))) (.f64 (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))) (sqrt.f64 (cbrt.f64 (.f64 y-scale (*.f64 (/.f64 (PI.f64) x-scale) angle))))))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))) 2)) (cbrt.f64 (sqrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))))) (.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))) 2)) (cbrt.f64 (sqrt.f64 (.f64 y-scale (*.f64 (/.f64 (PI.f64) x-scale) angle))))))
(.f64 (.f64 (cbrt.f64 (sqrt.f64 (.f64 (/.f64 (PI.f64) x-scale) (.f64 angle y-scale)))) (cbrt.f64 (sqrt.f64 (.f64 (/.f64 (PI.f64) x-scale) (.f64 angle y-scale))))) (pow.f64 (cbrt.f64 (.f64 (/.f64 (PI.f64) x-scale) (.f64 angle y-scale))) 2))
(.f64 (cbrt.f64 (sqrt.f64 (.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale))))) (.f64 (cbrt.f64 (sqrt.f64 (.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale))))) (pow.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))) 2)))
(.f64 (.f64 (sqrt.f64 (.f64 (/.f64 (PI.f64) x-scale) angle)) (sqrt.f64 y-scale)) (.f64 (sqrt.f64 (*.f64 (/.f64 (PI.f64) x-scale) angle)) (sqrt.f64 y-scale)))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(.f64 (.f64 (/.f64 (sqrt.f64 (.f64 angle (PI.f64))) (sqrt.f64 x-scale)) (sqrt.f64 y-scale)) (.f64 (/.f64 (sqrt.f64 (*.f64 angle (PI.f64))) (sqrt.f64 x-scale)) (sqrt.f64 y-scale)))
(.f64 (sqrt.f64 y-scale) (.f64 (/.f64 (sqrt.f64 (.f64 angle (PI.f64))) (sqrt.f64 x-scale)) (.f64 (sqrt.f64 y-scale) (/.f64 (sqrt.f64 (*.f64 angle (PI.f64))) (sqrt.f64 x-scale)))))
(.f64 (.f64 angle (PI.f64)) (*.f64 (/.f64 (sqrt.f64 y-scale) (sqrt.f64 x-scale)) (/.f64 (sqrt.f64 y-scale) (sqrt.f64 x-scale))))
(pow.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle)) 1)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(pow.f64 (sqrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))) 2)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(pow.f64 (cbrt.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))) 3)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(pow.f64 (pow.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle)) 3) 1/3)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(pow.f64 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))) -1)
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(neg.f64 (.f64 (/.f64 y-scale (neg.f64 x-scale)) (.f64 angle (PI.f64))))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(neg.f64 (.f64 y-scale (/.f64 (.f64 angle (PI.f64)) (neg.f64 x-scale))))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(neg.f64 (.f64 (.f64 (/.f64 y-scale (neg.f64 x-scale)) (*.f64 angle (PI.f64))) 1))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(neg.f64 (.f64 1 (.f64 (/.f64 y-scale (neg.f64 x-scale)) (*.f64 angle (PI.f64)))))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(neg.f64 (/.f64 (neg.f64 y-scale) (/.f64 x-scale (*.f64 angle (PI.f64)))))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(sqrt.f64 (pow.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle)) 2))
(sqrt.f64 (pow.f64 (.f64 (/.f64 (PI.f64) x-scale) (.f64 angle y-scale)) 2))
(fabs.f64 (.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale))))
(log.f64 (pow.f64 (exp.f64 y-scale) (*.f64 (/.f64 (PI.f64) x-scale) angle)))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(log.f64 (+.f64 1 (expm1.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle)))))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(cbrt.f64 (pow.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle)) 3))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(cbrt.f64 (/.f64 (pow.f64 y-scale 3) (pow.f64 (/.f64 x-scale (*.f64 angle (PI.f64))) 3)))
(cbrt.f64 (/.f64 (pow.f64 y-scale 3) (pow.f64 (/.f64 (/.f64 x-scale angle) (PI.f64)) 3)))
(expm1.f64 (log1p.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(exp.f64 (log.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(exp.f64 (.f64 (log.f64 (.f64 y-scale (*.f64 (/.f64 (PI.f64) x-scale) angle))) 1))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(log1p.f64 (expm1.f64 (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))))
(.f64 angle (.f64 (PI.f64) (/.f64 y-scale x-scale)))
(.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))
(-.f64 (exp.f64 (log1p.f64 (.f64 y-scale (.f64 (*.f64 (/.f64 (PI.f64) x-scale) angle) 1/180)))) 1)
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(/.f64 1/180 (/.f64 x-scale (.f64 y-scale (.f64 angle (PI.f64)))))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(/.f64 1 (/.f64 (/.f64 x-scale (.f64 angle (PI.f64))) (.f64 y-scale 1/180)))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(/.f64 (.f64 y-scale 1/180) (/.f64 x-scale (.f64 angle (PI.f64))))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(/.f64 (/.f64 (.f64 y-scale 1/180) x-scale) (/.f64 1 (.f64 angle (PI.f64))))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(/.f64 (/.f64 (.f64 y-scale 1/180) 1) (/.f64 x-scale (.f64 angle (PI.f64))))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(/.f64 (/.f64 (.f64 y-scale 1/180) (sqrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) (sqrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(/.f64 (/.f64 (.f64 y-scale 1/180) (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2)) (cbrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(/.f64 (.f64 y-scale -1/180) (/.f64 (neg.f64 x-scale) (.f64 angle (PI.f64))))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(pow.f64 (.f64 y-scale (.f64 (*.f64 (/.f64 (PI.f64) x-scale) angle) 1/180)) 1)
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(pow.f64 (sqrt.f64 (.f64 y-scale (.f64 (*.f64 (/.f64 (PI.f64) x-scale) angle) 1/180))) 2)
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(pow.f64 (cbrt.f64 (.f64 y-scale (.f64 (*.f64 (/.f64 (PI.f64) x-scale) angle) 1/180))) 3)
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(pow.f64 (pow.f64 (.f64 y-scale (.f64 (*.f64 (/.f64 (PI.f64) x-scale) angle) 1/180)) 3) 1/3)
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(neg.f64 (.f64 (.f64 (/.f64 y-scale (neg.f64 x-scale)) (*.f64 angle (PI.f64))) 1/180))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(neg.f64 (.f64 1/180 (.f64 (/.f64 y-scale (neg.f64 x-scale)) (*.f64 angle (PI.f64)))))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(neg.f64 (.f64 (/.f64 (.f64 y-scale 1/180) (neg.f64 x-scale)) (*.f64 angle (PI.f64))))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(neg.f64 (/.f64 (.f64 y-scale 1/180) (/.f64 (neg.f64 x-scale) (.f64 angle (PI.f64)))))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(sqrt.f64 (.f64 1/32400 (pow.f64 (.f64 y-scale (*.f64 (/.f64 (PI.f64) x-scale) angle)) 2)))
(sqrt.f64 (.f64 (pow.f64 (.f64 (/.f64 (PI.f64) x-scale) (*.f64 angle y-scale)) 2) 1/32400))
(sqrt.f64 (pow.f64 (*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64)))) 2))
(log.f64 (pow.f64 (exp.f64 1/180) (.f64 y-scale (.f64 (/.f64 (PI.f64) x-scale) angle))))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(log.f64 (+.f64 1 (expm1.f64 (.f64 y-scale (.f64 (*.f64 (/.f64 (PI.f64) x-scale) angle) 1/180)))))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(cbrt.f64 (pow.f64 (.f64 y-scale (.f64 (*.f64 (/.f64 (PI.f64) x-scale) angle) 1/180)) 3))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(expm1.f64 (log1p.f64 (.f64 y-scale (.f64 (*.f64 (/.f64 (PI.f64) x-scale) angle) 1/180))))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(exp.f64 (log.f64 (.f64 y-scale (.f64 (*.f64 (/.f64 (PI.f64) x-scale) angle) 1/180))))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(exp.f64 (.f64 (log.f64 (.f64 y-scale (.f64 (.f64 (/.f64 (PI.f64) x-scale) angle) 1/180))) 1))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(log1p.f64 (expm1.f64 (.f64 y-scale (.f64 (*.f64 (/.f64 (PI.f64) x-scale) angle) 1/180))))
(.f64 (.f64 angle (*.f64 (PI.f64) (/.f64 y-scale x-scale))) 1/180)
(*.f64 y-scale (/.f64 1/180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(-.f64 (exp.f64 (log1p.f64 (/.f64 x-scale (*.f64 angle (PI.f64))))) 1)
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 x-scale (/.f64 1 (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 x-scale (neg.f64 (/.f64 -1 (.f64 angle (PI.f64)))))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 (/.f64 x-scale (.f64 angle (PI.f64))) 1)
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 1 (/.f64 x-scale (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 (sqrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) (sqrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 (sqrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) (neg.f64 (neg.f64 (sqrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))))))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 (sqrt.f64 x-scale) (.f64 (sqrt.f64 x-scale) (/.f64 1 (*.f64 angle (PI.f64)))))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) (pow.f64 (cbrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))) 2))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2) (cbrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2) (neg.f64 (neg.f64 (cbrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))))))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 (pow.f64 (cbrt.f64 x-scale) 2) (.f64 (cbrt.f64 x-scale) (/.f64 1 (*.f64 angle (PI.f64)))))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(*.f64 (/.f64 x-scale angle) (/.f64 1 (PI.f64)))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 (/.f64 1 (.f64 angle (PI.f64))) x-scale)
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 (neg.f64 x-scale) (/.f64 -1 (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 (sqrt.f64 (/.f64 (neg.f64 x-scale) (.f64 angle (PI.f64)))) (neg.f64 (sqrt.f64 (/.f64 (neg.f64 x-scale) (*.f64 angle (PI.f64))))))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 (.f64 (cbrt.f64 (/.f64 (neg.f64 x-scale) (.f64 angle (PI.f64)))) (cbrt.f64 (/.f64 (neg.f64 x-scale) (.f64 angle (PI.f64))))) (neg.f64 (cbrt.f64 (/.f64 (neg.f64 x-scale) (*.f64 angle (PI.f64))))))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(*.f64 (/.f64 1 angle) (/.f64 x-scale (PI.f64)))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(*.f64 (/.f64 1 (PI.f64)) (/.f64 x-scale angle))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 (/.f64 1 (sqrt.f64 (.f64 angle (PI.f64)))) (/.f64 x-scale (sqrt.f64 (*.f64 angle (PI.f64)))))
(.f64 (/.f64 x-scale (sqrt.f64 (.f64 angle (PI.f64)))) (/.f64 1 (sqrt.f64 (*.f64 angle (PI.f64)))))
(/.f64 (/.f64 x-scale (sqrt.f64 (.f64 angle (PI.f64)))) (sqrt.f64 (.f64 angle (PI.f64))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (.f64 angle (PI.f64))) 2)) (/.f64 x-scale (cbrt.f64 (*.f64 angle (PI.f64)))))
(/.f64 (/.f64 x-scale (cbrt.f64 (.f64 angle (PI.f64)))) (pow.f64 (cbrt.f64 (.f64 angle (PI.f64))) 2))
(.f64 -1 (/.f64 (neg.f64 x-scale) (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 (neg.f64 (sqrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) (neg.f64 (sqrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64))))))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 (neg.f64 (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2)) (neg.f64 (cbrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64))))))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 (/.f64 -1 (.f64 angle (PI.f64))) (neg.f64 x-scale))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 (/.f64 (sqrt.f64 x-scale) 1) (/.f64 (sqrt.f64 x-scale) (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(*.f64 (/.f64 (sqrt.f64 x-scale) angle) (/.f64 (sqrt.f64 x-scale) (PI.f64)))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) 1) (/.f64 (cbrt.f64 x-scale) (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(*.f64 (/.f64 (sqrt.f64 x-scale) (PI.f64)) (/.f64 (sqrt.f64 x-scale) angle))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 (/.f64 (sqrt.f64 x-scale) (.f64 angle (PI.f64))) (sqrt.f64 x-scale))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 (/.f64 (sqrt.f64 x-scale) (pow.f64 (cbrt.f64 (.f64 angle (PI.f64))) 2)) (/.f64 (sqrt.f64 x-scale) (cbrt.f64 (*.f64 angle (PI.f64)))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (.f64 angle (PI.f64))) 2)) (/.f64 x-scale (cbrt.f64 (*.f64 angle (PI.f64)))))
(/.f64 (/.f64 x-scale (cbrt.f64 (.f64 angle (PI.f64)))) (pow.f64 (cbrt.f64 (.f64 angle (PI.f64))) 2))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) angle) (/.f64 (cbrt.f64 x-scale) (PI.f64)))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(*.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (PI.f64)) (/.f64 (cbrt.f64 x-scale) angle))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (sqrt.f64 (.f64 angle (PI.f64)))) (/.f64 (cbrt.f64 x-scale) (sqrt.f64 (*.f64 angle (PI.f64)))))
(.f64 (/.f64 x-scale (sqrt.f64 (.f64 angle (PI.f64)))) (/.f64 1 (sqrt.f64 (*.f64 angle (PI.f64)))))
(/.f64 (/.f64 x-scale (sqrt.f64 (.f64 angle (PI.f64)))) (sqrt.f64 (.f64 angle (PI.f64))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (pow.f64 (cbrt.f64 (.f64 angle (PI.f64))) 2)) (cbrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))))
(.f64 (cbrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64))) (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (pow.f64 (cbrt.f64 (.f64 angle (PI.f64))) 2)))
(/.f64 (.f64 (pow.f64 (cbrt.f64 x-scale) 2) (cbrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64)))) (pow.f64 (cbrt.f64 (.f64 angle (PI.f64))) 2))
(.f64 (/.f64 1 (/.f64 (.f64 angle (PI.f64)) (sqrt.f64 x-scale))) (sqrt.f64 x-scale))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 (/.f64 1 (/.f64 (.f64 angle (PI.f64)) (pow.f64 (cbrt.f64 x-scale) 2))) (cbrt.f64 x-scale))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 (/.f64 1 (/.f64 1 x-scale)) (/.f64 1 (.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 (/.f64 1 (/.f64 1 (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2))) (cbrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (.f64 angle (PI.f64))) (cbrt.f64 x-scale))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 (neg.f64 (sqrt.f64 (/.f64 (neg.f64 x-scale) (.f64 angle (PI.f64))))) (sqrt.f64 (/.f64 (neg.f64 x-scale) (*.f64 angle (PI.f64)))))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 (neg.f64 (.f64 (cbrt.f64 (/.f64 (neg.f64 x-scale) (.f64 angle (PI.f64)))) (cbrt.f64 (/.f64 (neg.f64 x-scale) (.f64 angle (PI.f64)))))) (cbrt.f64 (/.f64 (neg.f64 x-scale) (*.f64 angle (PI.f64)))))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 (neg.f64 (neg.f64 (sqrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 (neg.f64 (neg.f64 (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2))) (cbrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 (.f64 (sqrt.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) (.f64 (sqrt.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) (cbrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64))))))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 (.f64 (cbrt.f64 (sqrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) (.f64 (cbrt.f64 (sqrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) (cbrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64))))))
(.f64 (.f64 (cbrt.f64 (sqrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64)))) (cbrt.f64 (sqrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64))))) (pow.f64 (cbrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64))) 2))
(.f64 (pow.f64 (cbrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64))) 2) (.f64 (cbrt.f64 (sqrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64)))) (cbrt.f64 (sqrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64))))))
(.f64 (.f64 (sqrt.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) (sqrt.f64 (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2))) (.f64 (sqrt.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) (sqrt.f64 (pow.f64 (cbrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))) 2))))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 (.f64 (cbrt.f64 (sqrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) (sqrt.f64 (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2))) (.f64 (cbrt.f64 (sqrt.f64 (/.f64 x-scale (.f64 angle (PI.f64))))) (sqrt.f64 (pow.f64 (cbrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))) 2))))
(.f64 (.f64 (cbrt.f64 (sqrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64)))) (cbrt.f64 (sqrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64))))) (pow.f64 (cbrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64))) 2))
(.f64 (pow.f64 (cbrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64))) 2) (.f64 (cbrt.f64 (sqrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64)))) (cbrt.f64 (sqrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64))))))
(.f64 (.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) (sqrt.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))))) (.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) (sqrt.f64 (cbrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))))))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(.f64 (.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2)) (cbrt.f64 (sqrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))))) (.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 2)) (cbrt.f64 (sqrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))))))
(.f64 (.f64 (cbrt.f64 (sqrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64)))) (cbrt.f64 (sqrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64))))) (pow.f64 (cbrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64))) 2))
(.f64 (pow.f64 (cbrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64))) 2) (.f64 (cbrt.f64 (sqrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64)))) (cbrt.f64 (sqrt.f64 (/.f64 (/.f64 x-scale angle) (PI.f64))))))
(.f64 (.f64 (sqrt.f64 (/.f64 1 (.f64 angle (PI.f64)))) (sqrt.f64 x-scale)) (.f64 (sqrt.f64 (/.f64 1 (*.f64 angle (PI.f64)))) (sqrt.f64 x-scale)))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(pow.f64 (/.f64 x-scale (*.f64 angle (PI.f64))) 1)
(/.f64 (/.f64 x-scale angle) (PI.f64))
(pow.f64 (sqrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))) 2)
(/.f64 (/.f64 x-scale angle) (PI.f64))
(pow.f64 (cbrt.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))) 3)
(/.f64 (/.f64 x-scale angle) (PI.f64))
(pow.f64 (pow.f64 (/.f64 x-scale (*.f64 angle (PI.f64))) 3) 1/3)
(/.f64 (/.f64 x-scale angle) (PI.f64))
(pow.f64 (*.f64 (/.f64 (PI.f64) x-scale) angle) -1)
(/.f64 (/.f64 x-scale angle) (PI.f64))
(neg.f64 (/.f64 (neg.f64 x-scale) (*.f64 angle (PI.f64))))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(neg.f64 (/.f64 (/.f64 (neg.f64 x-scale) (*.f64 angle (PI.f64))) 1))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(sqrt.f64 (pow.f64 (/.f64 x-scale (*.f64 angle (PI.f64))) 2))
(sqrt.f64 (pow.f64 (/.f64 (/.f64 x-scale angle) (PI.f64)) 2))
(fabs.f64 (/.f64 (/.f64 x-scale angle) (PI.f64)))
(log.f64 (exp.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(log.f64 (+.f64 1 (expm1.f64 (/.f64 x-scale (*.f64 angle (PI.f64))))))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(cbrt.f64 (pow.f64 (/.f64 x-scale (*.f64 angle (PI.f64))) 3))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(cbrt.f64 (/.f64 (pow.f64 x-scale 3) (pow.f64 (*.f64 angle (PI.f64)) 3)))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(expm1.f64 (log1p.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(exp.f64 (log.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(exp.f64 (.f64 (log.f64 (/.f64 x-scale (.f64 angle (PI.f64)))) 1))
(/.f64 (/.f64 x-scale angle) (PI.f64))
(log1p.f64 (expm1.f64 (/.f64 x-scale (*.f64 angle (PI.f64)))))
(/.f64 (/.f64 x-scale angle) (PI.f64))

localize41.0ms (0%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	99.6%	(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
	99.4%	(.f64 (PI.f64) (.f64 1/180 angle))
✓	94.9%	(/.f64 y-scale (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
	60.5%	(tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))

Compiler

Compiled 82 to 53 computations (35.4% saved)

series7.0ms (0%)

Counts

2 → 60

Calls

15 calls:

Time	Variable		Point	Expression
2.0ms	angle	@	0	(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
1.0ms	angle	@	inf	(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
1.0ms	x-scale	@	0	(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
1.0ms	angle	@	-inf	(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
1.0ms	x-scale	@	-inf	(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))

rewrite96.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

1752×	`associate-*r/`
1532×	`associate-/l*`
1410×	`associate-*l/`
302×	`add-sqr-sqrt`
298×	`pow1`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	14	56
1	292	56
2	3797	56

Stop Event

1×	node limit

Counts

2 → 76

Calls

Call 1

Inputs
(/.f64 y-scale (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))

Outputs

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

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

simplify100.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

1188×	`distribute-lft-in`
1184×	`distribute-rgt-in`
904×	`associate-/r/`
728×	`associate-/l/`
436×	`associate-r`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	291	6774
1	788	6720
2	3447	6572

Stop Event

1×	node limit

Counts

136 → 127

Calls

Call 1

Inputs
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(+.f64 (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 3) (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))))) x-scale) (.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale)))
(+.f64 (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 3) (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))))) x-scale) (+.f64 (.f64 1/180 (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)) (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (*.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))))) x-scale)))
(+.f64 (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 3) (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))))) x-scale) (+.f64 (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 7) (-.f64 (.f64 -1/30855889612800000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 1/25194240000 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 4))) (.f64 -1/64800 (.f64 (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))) (pow.f64 (PI.f64) 2)))))))) x-scale) (+.f64 (.f64 1/180 (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)) (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (*.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))))) x-scale))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 180 (/.f64 x-scale (.f64 angle (PI.f64))))
(+.f64 (.f64 180 (/.f64 x-scale (.f64 angle (PI.f64)))) (.f64 -32400 (/.f64 (.f64 x-scale (.f64 angle (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (pow.f64 (PI.f64) 3))))) (pow.f64 (PI.f64) 2))))
(+.f64 (.f64 180 (/.f64 x-scale (.f64 angle (PI.f64)))) (+.f64 (.f64 -32400 (/.f64 (.f64 x-scale (.f64 angle (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))))) (pow.f64 (PI.f64) 2))) (.f64 -1 (.f64 (pow.f64 angle 3) (+.f64 (.f64 32400 (/.f64 (.f64 x-scale (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (pow.f64 (PI.f64) 2))) (.f64 -5832000 (/.f64 (.f64 x-scale (pow.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (pow.f64 (PI.f64) 3))) 2)) (pow.f64 (PI.f64) 3))))))))
(+.f64 (.f64 180 (/.f64 x-scale (.f64 angle (PI.f64)))) (+.f64 (.f64 -32400 (/.f64 (.f64 x-scale (.f64 angle (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))))) (pow.f64 (PI.f64) 2))) (+.f64 (.f64 -1 (.f64 (pow.f64 angle 3) (+.f64 (.f64 32400 (/.f64 (.f64 x-scale (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (pow.f64 (PI.f64) 2))) (.f64 -5832000 (/.f64 (.f64 x-scale (pow.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) 2)) (pow.f64 (PI.f64) 3)))))) (.f64 -1 (.f64 (+.f64 (.f64 -5832000 (/.f64 (.f64 x-scale (.f64 (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))) (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))))) (pow.f64 (PI.f64) 3))) (+.f64 (.f64 -180 (/.f64 (.f64 (+.f64 (.f64 32400 (/.f64 (.f64 x-scale (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (pow.f64 (PI.f64) 2))) (.f64 -5832000 (/.f64 (.f64 x-scale (pow.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3)))) (PI.f64))) (.f64 32400 (/.f64 (.f64 x-scale (-.f64 (.f64 -1/30855889612800000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 1/25194240000 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 4))) (.f64 -1/64800 (.f64 (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))) (pow.f64 (PI.f64) 2))))))) (pow.f64 (PI.f64) 2))))) (pow.f64 angle 5))))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(-.f64 (exp.f64 (log1p.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale)))) 1)
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(.f64 (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale)) 1)
(.f64 1 (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale)))
(.f64 (sqrt.f64 (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale))) (sqrt.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))))
(.f64 (sqrt.f64 y-scale) (.f64 (sqrt.f64 y-scale) (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)))
(.f64 (cbrt.f64 (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale))) (pow.f64 (cbrt.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))) 2))
(.f64 (pow.f64 (cbrt.f64 (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale))) 2) (cbrt.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))))
(.f64 (pow.f64 (cbrt.f64 y-scale) 2) (.f64 (cbrt.f64 y-scale) (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) y-scale)
(.f64 (neg.f64 y-scale) (/.f64 1 (/.f64 (neg.f64 x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (.f64 (/.f64 y-scale x-scale) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (/.f64 y-scale 1) (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (/.f64 1 x-scale) (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (/.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 x-scale)) (/.f64 y-scale (sqrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2)) (/.f64 y-scale (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 (/.f64 y-scale (neg.f64 x-scale)) (neg.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 (sqrt.f64 y-scale) x-scale) (/.f64 (sqrt.f64 y-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (sqrt.f64 y-scale) 1) (/.f64 (sqrt.f64 y-scale) (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (sqrt.f64 y-scale) (pow.f64 (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2)) (/.f64 (sqrt.f64 y-scale) (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) x-scale) (/.f64 (cbrt.f64 y-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) 1) (/.f64 (cbrt.f64 y-scale) (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (sqrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (cbrt.f64 y-scale) (sqrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (pow.f64 (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2)) (cbrt.f64 (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale))))
(pow.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale)) 1)
(pow.f64 (sqrt.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))) 2)
(pow.f64 (cbrt.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))) 3)
(pow.f64 (pow.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale)) 3) 1/3)
(pow.f64 (/.f64 x-scale (.f64 y-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) -1)
(neg.f64 (/.f64 y-scale (/.f64 (neg.f64 x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(sqrt.f64 (pow.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale)) 2))
(log.f64 (pow.f64 (exp.f64 y-scale) (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale)))))
(cbrt.f64 (pow.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale)) 3))
(cbrt.f64 (/.f64 (pow.f64 y-scale 3) (pow.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3)))
(expm1.f64 (log1p.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))))
(exp.f64 (log.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))))
(exp.f64 (.f64 (log.f64 (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale))) 1))
(log1p.f64 (expm1.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))))
(-.f64 (exp.f64 (log1p.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 1)
(.f64 x-scale (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 1)
(.f64 1 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (sqrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sqrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (sqrt.f64 x-scale) (.f64 (sqrt.f64 x-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 2))
(.f64 (pow.f64 (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2) (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (pow.f64 (cbrt.f64 x-scale) 2) (.f64 (cbrt.f64 x-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale)
(.f64 (neg.f64 x-scale) (/.f64 1 (neg.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 1 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 x-scale (sqrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 x-scale (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 (sqrt.f64 x-scale) 1) (/.f64 (sqrt.f64 x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 (sqrt.f64 x-scale) (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (sqrt.f64 x-scale) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) 1) (/.f64 (cbrt.f64 x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (cbrt.f64 x-scale) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(pow.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 1)
(pow.f64 (sqrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2)
(pow.f64 (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 3)
(pow.f64 (pow.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3) 1/3)
(pow.f64 (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) -1)
(neg.f64 (/.f64 x-scale (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(sqrt.f64 (pow.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))
(log.f64 (exp.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(log.f64 (+.f64 1 (expm1.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(cbrt.f64 (pow.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3))
(cbrt.f64 (/.f64 (pow.f64 x-scale 3) (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)))
(expm1.f64 (log1p.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(exp.f64 (log.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(exp.f64 (.f64 (log.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 1))
(log1p.f64 (expm1.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))

Outputs
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 y-scale (/.f64 x-scale (.f64 angle (PI.f64)))))
(.f64 1/180 (.f64 (/.f64 y-scale x-scale) (*.f64 angle (PI.f64))))
(.f64 (/.f64 (.f64 y-scale 1/180) (/.f64 x-scale angle)) (PI.f64))
(+.f64 (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 3) (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))))) x-scale) (.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale)))
(+.f64 (.f64 1/180 (/.f64 y-scale (/.f64 x-scale (.f64 angle (PI.f64))))) (/.f64 y-scale (/.f64 x-scale (.f64 (pow.f64 angle 3) (.f64 (pow.f64 (PI.f64) 3) 1/17496000)))))
(fma.f64 1/180 (.f64 (/.f64 y-scale x-scale) (.f64 angle (PI.f64))) (.f64 (/.f64 y-scale x-scale) (.f64 (pow.f64 angle 3) (*.f64 (pow.f64 (PI.f64) 3) 1/17496000))))
(fma.f64 1/180 (.f64 (.f64 (/.f64 y-scale x-scale) angle) (PI.f64)) (.f64 (/.f64 y-scale x-scale) (.f64 (pow.f64 (PI.f64) 3) (*.f64 1/17496000 (pow.f64 angle 3)))))
(+.f64 (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 3) (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))))) x-scale) (+.f64 (.f64 1/180 (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)) (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (*.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))))) x-scale)))
(+.f64 (/.f64 y-scale (/.f64 x-scale (.f64 (pow.f64 angle 3) (.f64 (pow.f64 (PI.f64) 3) 1/17496000)))) (fma.f64 1/180 (/.f64 y-scale (/.f64 x-scale (.f64 angle (PI.f64)))) (/.f64 y-scale (/.f64 x-scale (.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 (PI.f64) 5) 1/4534963200000))))))))
(+.f64 (.f64 (/.f64 y-scale x-scale) (.f64 (pow.f64 angle 3) (.f64 (pow.f64 (PI.f64) 3) 1/17496000))) (fma.f64 1/180 (.f64 (/.f64 y-scale x-scale) (.f64 angle (PI.f64))) (.f64 (/.f64 y-scale x-scale) (.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 3) (.f64 1/17496000 (pow.f64 (PI.f64) 2))) (*.f64 (pow.f64 (PI.f64) 5) 1/4534963200000)))))))
(+.f64 (.f64 (/.f64 (.f64 y-scale 1/180) (/.f64 x-scale angle)) (PI.f64)) (.f64 (/.f64 y-scale x-scale) (+.f64 (.f64 (pow.f64 (PI.f64) 3) (.f64 1/17496000 (pow.f64 angle 3))) (.f64 (pow.f64 angle 5) (-.f64 (.f64 (pow.f64 (PI.f64) 5) -1/5668704000000) (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (.f64 (pow.f64 (PI.f64) 2) -1/64800)))))))
(+.f64 (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 3) (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))))) x-scale) (+.f64 (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 7) (-.f64 (.f64 -1/30855889612800000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 1/25194240000 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 4))) (.f64 -1/64800 (.f64 (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))) (pow.f64 (PI.f64) 2)))))))) x-scale) (+.f64 (.f64 1/180 (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)) (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (*.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))))) x-scale))))
(+.f64 (/.f64 y-scale (/.f64 x-scale (.f64 (pow.f64 angle 3) (.f64 (pow.f64 (PI.f64) 3) 1/17496000)))) (+.f64 (fma.f64 1/180 (/.f64 y-scale (/.f64 x-scale (.f64 angle (PI.f64)))) (/.f64 y-scale (/.f64 x-scale (.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 (PI.f64) 5) 1/4534963200000))))))) (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 7) (-.f64 (.f64 -1/30855889612800000000 (pow.f64 (PI.f64) 7)) (fma.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7) (fma.f64 1/25194240000 (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (pow.f64 (PI.f64) 4)) (.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (pow.f64 (PI.f64) 2)) (*.f64 (pow.f64 (PI.f64) 5) 1/4534963200000)))))))))) x-scale)))
(+.f64 (.f64 (/.f64 y-scale x-scale) (.f64 (pow.f64 angle 3) (.f64 (pow.f64 (PI.f64) 3) 1/17496000))) (+.f64 (fma.f64 1/180 (.f64 (/.f64 y-scale x-scale) (.f64 angle (PI.f64))) (.f64 (/.f64 y-scale x-scale) (.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 3) (.f64 1/17496000 (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 (PI.f64) 5) 1/4534963200000)))))) (.f64 (/.f64 y-scale x-scale) (.f64 (pow.f64 angle 7) (-.f64 (.f64 (pow.f64 (PI.f64) 7) 1/5142648268800000000) (fma.f64 1/25194240000 (.f64 (pow.f64 (PI.f64) 3) (.f64 1/17496000 (pow.f64 (PI.f64) 4))) (.f64 (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 3) (.f64 1/17496000 (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 (PI.f64) 5) 1/4534963200000))) (.f64 (pow.f64 (PI.f64) 2) -1/64800))))))))
(+.f64 (fma.f64 1/180 (.f64 (.f64 (/.f64 y-scale x-scale) angle) (PI.f64)) (.f64 (/.f64 y-scale x-scale) (.f64 (pow.f64 angle 5) (-.f64 (.f64 (pow.f64 (PI.f64) 5) -1/5668704000000) (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (.f64 (pow.f64 (PI.f64) 2) -1/64800)))))) (.f64 (/.f64 y-scale x-scale) (+.f64 (.f64 (pow.f64 (PI.f64) 3) (.f64 1/17496000 (pow.f64 angle 3))) (.f64 (pow.f64 angle 7) (-.f64 (.f64 (pow.f64 (PI.f64) 7) 1/5142648268800000000) (fma.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 (pow.f64 (PI.f64) 5) -1/5668704000000) (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (.f64 (pow.f64 (PI.f64) 2) -1/64800)))) (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (*.f64 (pow.f64 (PI.f64) 4) 1/25194240000))))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) y-scale))
(/.f64 (/.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 180 (/.f64 x-scale (.f64 angle (PI.f64))))
(*.f64 180 (/.f64 (/.f64 x-scale angle) (PI.f64)))
(+.f64 (.f64 180 (/.f64 x-scale (.f64 angle (PI.f64)))) (.f64 -32400 (/.f64 (.f64 x-scale (.f64 angle (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (pow.f64 (PI.f64) 3))))) (pow.f64 (PI.f64) 2))))
(fma.f64 180 (/.f64 x-scale (.f64 angle (PI.f64))) (.f64 -32400 (/.f64 (.f64 (.f64 x-scale angle) (*.f64 (pow.f64 (PI.f64) 3) 1/17496000)) (pow.f64 (PI.f64) 2))))
(fma.f64 180 (/.f64 x-scale (.f64 angle (PI.f64))) (/.f64 (.f64 (.f64 -32400 (.f64 angle x-scale)) (*.f64 (pow.f64 (PI.f64) 3) 1/17496000)) (pow.f64 (PI.f64) 2)))
(fma.f64 -32400 (.f64 (/.f64 x-scale (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 (PI.f64) 3) (.f64 1/17496000 angle))) (.f64 180 (/.f64 (/.f64 x-scale angle) (PI.f64))))
(+.f64 (.f64 180 (/.f64 x-scale (.f64 angle (PI.f64)))) (+.f64 (.f64 -32400 (/.f64 (.f64 x-scale (.f64 angle (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))))) (pow.f64 (PI.f64) 2))) (.f64 -1 (.f64 (pow.f64 angle 3) (+.f64 (.f64 32400 (/.f64 (.f64 x-scale (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (pow.f64 (PI.f64) 2))) (.f64 -5832000 (/.f64 (.f64 x-scale (pow.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (*.f64 -1/11664000 (pow.f64 (PI.f64) 3))) 2)) (pow.f64 (PI.f64) 3))))))))
(fma.f64 180 (/.f64 x-scale (.f64 angle (PI.f64))) (fma.f64 -32400 (/.f64 (.f64 (.f64 x-scale angle) (.f64 (pow.f64 (PI.f64) 3) 1/17496000)) (pow.f64 (PI.f64) 2)) (neg.f64 (.f64 (pow.f64 angle 3) (fma.f64 32400 (/.f64 (.f64 x-scale (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 (PI.f64) 5) 1/4534963200000)))) (pow.f64 (PI.f64) 2)) (.f64 -5832000 (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 3) (pow.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) 2)))))))))
(-.f64 (fma.f64 180 (/.f64 x-scale (.f64 angle (PI.f64))) (/.f64 (.f64 (.f64 -32400 (.f64 angle x-scale)) (.f64 (pow.f64 (PI.f64) 3) 1/17496000)) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 angle 3) (fma.f64 32400 (.f64 (/.f64 x-scale (pow.f64 (PI.f64) 2)) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 3) (.f64 1/17496000 (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 (PI.f64) 5) 1/4534963200000)))) (.f64 -5832000 (.f64 (/.f64 x-scale (pow.f64 (PI.f64) 3)) (pow.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) 2))))))
(-.f64 (fma.f64 -32400 (.f64 (/.f64 x-scale (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 (PI.f64) 3) (.f64 1/17496000 angle))) (.f64 180 (/.f64 (/.f64 x-scale angle) (PI.f64)))) (.f64 (pow.f64 angle 3) (fma.f64 32400 (.f64 (/.f64 x-scale (pow.f64 (PI.f64) 2)) (-.f64 (.f64 (pow.f64 (PI.f64) 5) -1/5668704000000) (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (.f64 (pow.f64 (PI.f64) 2) -1/64800)))) (.f64 -5832000 (.f64 (/.f64 x-scale (pow.f64 (PI.f64) 3)) (pow.f64 (*.f64 (pow.f64 (PI.f64) 3) 1/17496000) 2))))))
(+.f64 (.f64 180 (/.f64 x-scale (.f64 angle (PI.f64)))) (+.f64 (.f64 -32400 (/.f64 (.f64 x-scale (.f64 angle (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))))) (pow.f64 (PI.f64) 2))) (+.f64 (.f64 -1 (.f64 (pow.f64 angle 3) (+.f64 (.f64 32400 (/.f64 (.f64 x-scale (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (pow.f64 (PI.f64) 2))) (.f64 -5832000 (/.f64 (.f64 x-scale (pow.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) 2)) (pow.f64 (PI.f64) 3)))))) (.f64 -1 (.f64 (+.f64 (.f64 -5832000 (/.f64 (.f64 x-scale (.f64 (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))) (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))))) (pow.f64 (PI.f64) 3))) (+.f64 (.f64 -180 (/.f64 (.f64 (+.f64 (.f64 32400 (/.f64 (.f64 x-scale (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5))))) (pow.f64 (PI.f64) 2))) (.f64 -5832000 (/.f64 (.f64 x-scale (pow.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) 2)) (pow.f64 (PI.f64) 3)))) (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3)))) (PI.f64))) (.f64 32400 (/.f64 (.f64 x-scale (-.f64 (.f64 -1/30855889612800000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7)) (+.f64 (.f64 1/25194240000 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 4))) (.f64 -1/64800 (.f64 (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.f64 -1/11664000 (pow.f64 (PI.f64) 3))) (pow.f64 (PI.f64) 2))) (.f64 1/4534963200000 (pow.f64 (PI.f64) 5)))) (pow.f64 (PI.f64) 2))))))) (pow.f64 (PI.f64) 2))))) (pow.f64 angle 5))))))
(fma.f64 180 (/.f64 x-scale (.f64 angle (PI.f64))) (fma.f64 -32400 (/.f64 (.f64 (.f64 x-scale angle) (.f64 (pow.f64 (PI.f64) 3) 1/17496000)) (pow.f64 (PI.f64) 2)) (.f64 -1 (+.f64 (.f64 (pow.f64 angle 3) (fma.f64 32400 (/.f64 (.f64 x-scale (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 (PI.f64) 5) 1/4534963200000)))) (pow.f64 (PI.f64) 2)) (.f64 -5832000 (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 3) (pow.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) 2)))))) (.f64 (pow.f64 angle 5) (fma.f64 -5832000 (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 3) (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 (PI.f64) 5) 1/4534963200000)))))) (fma.f64 -180 (/.f64 (fma.f64 32400 (/.f64 (.f64 x-scale (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 (PI.f64) 5) 1/4534963200000)))) (pow.f64 (PI.f64) 2)) (.f64 -5832000 (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 3) (pow.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) 2))))) (/.f64 (PI.f64) (.f64 (pow.f64 (PI.f64) 3) 1/17496000))) (.f64 32400 (/.f64 x-scale (/.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 -1/30855889612800000000 (pow.f64 (PI.f64) 7)) (fma.f64 -1/4407984230400000000 (pow.f64 (PI.f64) 7) (fma.f64 1/25194240000 (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (pow.f64 (PI.f64) 4)) (.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 (PI.f64) 5) 1/4534963200000))))))))))))))))))
(fma.f64 180 (/.f64 x-scale (.f64 angle (PI.f64))) (fma.f64 -32400 (.f64 (/.f64 x-scale (pow.f64 (PI.f64) 2)) (.f64 angle (.f64 (pow.f64 (PI.f64) 3) 1/17496000))) (neg.f64 (fma.f64 (pow.f64 angle 3) (fma.f64 32400 (.f64 (/.f64 x-scale (pow.f64 (PI.f64) 2)) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 3) (.f64 1/17496000 (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 (PI.f64) 5) 1/4534963200000)))) (.f64 -5832000 (.f64 (/.f64 x-scale (pow.f64 (PI.f64) 3)) (pow.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) 2)))) (.f64 (pow.f64 angle 5) (fma.f64 -5832000 (.f64 (/.f64 x-scale (pow.f64 (PI.f64) 3)) (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 3) (.f64 1/17496000 (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 (PI.f64) 5) 1/4534963200000))))) (fma.f64 32400 (.f64 (/.f64 x-scale (pow.f64 (PI.f64) 2)) (-.f64 (.f64 (pow.f64 (PI.f64) 7) 1/5142648268800000000) (fma.f64 1/25194240000 (.f64 (pow.f64 (PI.f64) 3) (.f64 1/17496000 (pow.f64 (PI.f64) 4))) (.f64 (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 3) (.f64 1/17496000 (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 (PI.f64) 5) 1/4534963200000))) (.f64 (pow.f64 (PI.f64) 2) -1/64800))))) (.f64 -180 (.f64 (/.f64 (fma.f64 32400 (.f64 (/.f64 x-scale (pow.f64 (PI.f64) 2)) (-.f64 (.f64 1/22674816000000 (pow.f64 (PI.f64) 5)) (fma.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 3) (.f64 1/17496000 (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 (PI.f64) 5) 1/4534963200000)))) (.f64 -5832000 (.f64 (/.f64 x-scale (pow.f64 (PI.f64) 3)) (pow.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) 2)))) (PI.f64)) (*.f64 (pow.f64 (PI.f64) 3) 1/17496000))))))))))
(fma.f64 180 (/.f64 (/.f64 x-scale angle) (PI.f64)) (-.f64 (.f64 -32400 (.f64 (/.f64 x-scale (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 (PI.f64) 3) (.f64 1/17496000 angle)))) (fma.f64 (pow.f64 angle 3) (fma.f64 32400 (.f64 (/.f64 x-scale (pow.f64 (PI.f64) 2)) (-.f64 (.f64 (pow.f64 (PI.f64) 5) -1/5668704000000) (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (.f64 (pow.f64 (PI.f64) 2) -1/64800)))) (.f64 -5832000 (.f64 (/.f64 x-scale (pow.f64 (PI.f64) 3)) (pow.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) 2)))) (.f64 (pow.f64 angle 5) (fma.f64 -5832000 (.f64 (/.f64 x-scale (pow.f64 (PI.f64) 3)) (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (-.f64 (.f64 (pow.f64 (PI.f64) 5) -1/5668704000000) (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (.f64 (pow.f64 (PI.f64) 2) -1/64800))))) (fma.f64 32400 (.f64 (/.f64 x-scale (pow.f64 (PI.f64) 2)) (-.f64 (.f64 (pow.f64 (PI.f64) 7) 1/5142648268800000000) (fma.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 (pow.f64 (PI.f64) 5) -1/5668704000000) (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (.f64 (pow.f64 (PI.f64) 2) -1/64800)))) (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (.f64 (pow.f64 (PI.f64) 4) 1/25194240000))))) (.f64 -180 (.f64 (/.f64 (fma.f64 32400 (.f64 (/.f64 x-scale (pow.f64 (PI.f64) 2)) (-.f64 (.f64 (pow.f64 (PI.f64) 5) -1/5668704000000) (.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) (.f64 (pow.f64 (PI.f64) 2) -1/64800)))) (.f64 -5832000 (.f64 (/.f64 x-scale (pow.f64 (PI.f64) 3)) (pow.f64 (.f64 (pow.f64 (PI.f64) 3) 1/17496000) 2)))) (PI.f64)) (*.f64 (pow.f64 (PI.f64) 3) 1/17496000)))))))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(-.f64 (exp.f64 (log1p.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale)))) 1)
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale)) 1)
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(.f64 1 (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale)))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(.f64 (sqrt.f64 (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale))) (sqrt.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(.f64 (sqrt.f64 y-scale) (.f64 (sqrt.f64 y-scale) (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(.f64 (cbrt.f64 (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale))) (pow.f64 (cbrt.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))) 2))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(.f64 (pow.f64 (cbrt.f64 (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale))) 2) (cbrt.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(.f64 (pow.f64 (cbrt.f64 y-scale) 2) (.f64 (cbrt.f64 y-scale) (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(.f64 (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale) y-scale)
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(.f64 (neg.f64 y-scale) (/.f64 1 (/.f64 (neg.f64 x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(.f64 (.f64 (/.f64 y-scale x-scale) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(.f64 (/.f64 y-scale 1) (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(.f64 (/.f64 1 x-scale) (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(.f64 (/.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 x-scale)) (/.f64 y-scale (sqrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 (/.f64 (sqrt.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sqrt.f64 x-scale)) (/.f64 y-scale (sqrt.f64 (/.f64 x-scale (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(/.f64 (/.f64 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 x-scale)) (/.f64 (sqrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) y-scale))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2)) (/.f64 y-scale (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(.f64 (/.f64 y-scale (neg.f64 x-scale)) (neg.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(.f64 (/.f64 (sqrt.f64 y-scale) x-scale) (/.f64 (sqrt.f64 y-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(.f64 (/.f64 (sqrt.f64 y-scale) 1) (/.f64 (sqrt.f64 y-scale) (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(.f64 (/.f64 (sqrt.f64 y-scale) (pow.f64 (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2)) (/.f64 (sqrt.f64 y-scale) (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) x-scale) (/.f64 (cbrt.f64 y-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) 1) (/.f64 (cbrt.f64 y-scale) (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (sqrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (cbrt.f64 y-scale) (sqrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (pow.f64 (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2)) (cbrt.f64 (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale))))
(.f64 (cbrt.f64 (.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale))) (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (pow.f64 (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) 2)))
(.f64 (cbrt.f64 (.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale))) (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (pow.f64 (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2)))
(.f64 (cbrt.f64 (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale))) (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (pow.f64 (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2)))
(pow.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale)) 1)
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(pow.f64 (sqrt.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))) 2)
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(pow.f64 (cbrt.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))) 3)
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(pow.f64 (pow.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale)) 3) 1/3)
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(pow.f64 (/.f64 x-scale (.f64 y-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) -1)
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(neg.f64 (/.f64 y-scale (/.f64 (neg.f64 x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(sqrt.f64 (pow.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale)) 2))
(sqrt.f64 (pow.f64 (.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale)) 2))
(fabs.f64 (.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)))
(fabs.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale)))
(log.f64 (pow.f64 (exp.f64 y-scale) (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale)))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(cbrt.f64 (pow.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale)) 3))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(cbrt.f64 (/.f64 (pow.f64 y-scale 3) (pow.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3)))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(expm1.f64 (log1p.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(exp.f64 (log.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(exp.f64 (.f64 (log.f64 (.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 y-scale x-scale))) 1))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(log1p.f64 (expm1.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))))
(.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) x-scale))
(.f64 y-scale (/.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale))
(.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale x-scale))
(-.f64 (exp.f64 (log1p.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 1)
(/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(.f64 x-scale (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 1)
(/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(.f64 1 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(.f64 (sqrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (sqrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(.f64 (sqrt.f64 x-scale) (.f64 (sqrt.f64 x-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(.f64 (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 2))
(/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(.f64 (pow.f64 (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2) (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(.f64 (pow.f64 (cbrt.f64 x-scale) 2) (.f64 (cbrt.f64 x-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale)
(/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(.f64 (neg.f64 x-scale) (/.f64 1 (neg.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(.f64 (/.f64 1 (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 x-scale (sqrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 x-scale (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(.f64 (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 (sqrt.f64 x-scale) 1) (/.f64 (sqrt.f64 x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(.f64 (/.f64 (sqrt.f64 x-scale) (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (sqrt.f64 x-scale) (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) 1) (/.f64 (cbrt.f64 x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (cbrt.f64 x-scale) (sqrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (pow.f64 (cbrt.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) 2)))
(.f64 (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (pow.f64 (cbrt.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2)))
(pow.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 1)
(/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(pow.f64 (sqrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2)
(/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(pow.f64 (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 3)
(/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(pow.f64 (pow.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3) 1/3)
(/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(pow.f64 (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) -1)
(/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(neg.f64 (/.f64 x-scale (neg.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(sqrt.f64 (pow.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))
(sqrt.f64 (pow.f64 (/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))
(fabs.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(log.f64 (exp.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(log.f64 (+.f64 1 (expm1.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(cbrt.f64 (pow.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3))
(/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(cbrt.f64 (/.f64 (pow.f64 x-scale 3) (pow.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)))
(/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(expm1.f64 (log1p.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(exp.f64 (log.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(exp.f64 (.f64 (log.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 1))
(/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(log1p.f64 (expm1.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 x-scale (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))

localize53.0ms (0%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	99.5%	(.f64 1/180 (.f64 angle (PI.f64)))
✓	94.7%	(/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
	62.0%	(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
	61.5%	(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))

Compiler

Compiled 131 to 75 computations (42.7% saved)

series3.0ms (0%)

Counts

2 → 4

Calls

12 calls:

Time	Variable		Point	Expression
1.0ms	angle	@	inf	(/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
1.0ms	angle	@	0	(/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
0.0ms	angle	@	-inf	(/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
0.0ms	y-scale	@	0	(/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
0.0ms	y-scale	@	-inf	(/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))

rewrite128.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

1900×	`associate-*l/`
350×	`distribute-lft-neg-in`
346×	`distribute-rgt-in`
336×	`add-sqr-sqrt`
332×	`pow1`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	16	70
1	327	70
2	4335	70

Stop Event

1×	node limit

Counts

2 → 81

Calls

Call 1

Inputs
(/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 1/180 (.f64 angle (PI.f64)))

Outputs

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

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

simplify89.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

1242×	`associate-/r*`
882×	`unswap-sqr`
850×	`associate-/l/`
724×	`associate-/r/`
552×	`distribute-rgt-in`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	263	5115
1	726	4959
2	2703	4959

Stop Event

1×	node limit

Counts

85 → 108

Calls

Call 1

Inputs
(.f64 180 (/.f64 y-scale (.f64 x-scale (*.f64 angle (PI.f64)))))
(+.f64 (.f64 180 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64))))) (.f64 angle (-.f64 (.f64 -1/360 (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.f64 -1/1080 (/.f64 (.f64 y-scale (PI.f64)) x-scale)))))
(+.f64 (.f64 180 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64))))) (+.f64 (.f64 angle (-.f64 (.f64 -1/360 (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.f64 -1/1080 (/.f64 (.f64 y-scale (PI.f64)) x-scale)))) (.f64 (pow.f64 angle 3) (-.f64 (.f64 1/139968000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (+.f64 (.f64 1/699840000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/194400 (.f64 (-.f64 (.f64 -1/360 (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.f64 -1/1080 (/.f64 (*.f64 y-scale (PI.f64)) x-scale))) (pow.f64 (PI.f64) 2))))))))
(+.f64 (.f64 (pow.f64 angle 5) (-.f64 (.f64 -1/136048896000000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 5)) x-scale)) (+.f64 (.f64 1/125971200000 (.f64 (-.f64 (.f64 -1/360 (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.f64 -1/1080 (/.f64 (.f64 y-scale (PI.f64)) x-scale))) (pow.f64 (PI.f64) 4))) (+.f64 (.f64 -1/194400 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 1/139968000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (+.f64 (.f64 1/699840000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/194400 (.f64 (-.f64 (.f64 -1/360 (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.f64 -1/1080 (/.f64 (.f64 y-scale (PI.f64)) x-scale))) (pow.f64 (PI.f64) 2))))))) (.f64 -1/952342272000000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 5)) x-scale)))))) (+.f64 (.f64 180 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64))))) (+.f64 (.f64 angle (-.f64 (.f64 -1/360 (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.f64 -1/1080 (/.f64 (.f64 y-scale (PI.f64)) x-scale)))) (.f64 (pow.f64 angle 3) (-.f64 (.f64 1/139968000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (+.f64 (.f64 1/699840000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/194400 (.f64 (-.f64 (.f64 -1/360 (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.f64 -1/1080 (/.f64 (.f64 y-scale (PI.f64)) x-scale))) (pow.f64 (PI.f64) 2)))))))))
(-.f64 (exp.f64 (log1p.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))))) 1)
(.f64 y-scale (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 1 (.f64 x-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 y-scale (.f64 (/.f64 1 x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))
(.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (.f64 y-scale (/.f64 1 (.f64 x-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (/.f64 1 (.f64 x-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))))
(.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 1)
(.f64 1 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))
(.f64 (sqrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (.f64 (sqrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (/.f64 1 (.f64 x-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (sqrt.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (sqrt.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2) (.f64 (cbrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (/.f64 1 (.f64 x-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (pow.f64 (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))) 2))
(.f64 (pow.f64 (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) 2) (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (/.f64 1 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))
(.f64 (/.f64 1 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (.f64 y-scale (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))) (/.f64 y-scale x-scale))
(.f64 (.f64 y-scale (neg.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (/.f64 1 (.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (neg.f64 x-scale))))
(.f64 (/.f64 y-scale 1) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))
(.f64 (/.f64 1 x-scale) (/.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))
(.f64 (/.f64 1 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))
(.f64 (/.f64 1 (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (/.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2)) (/.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 1) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) y-scale)
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (/.f64 y-scale (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))
(.f64 (.f64 (/.f64 1 x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) y-scale)
(.f64 (/.f64 1 (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (neg.f64 x-scale))) (.f64 y-scale (neg.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (/.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) x-scale))
(.f64 (/.f64 y-scale (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2)) (/.f64 y-scale (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 (sqrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) x-scale) (/.f64 (sqrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 (/.f64 (sqrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (/.f64 (sqrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))) x-scale))
(.f64 (/.f64 (sqrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 1) (/.f64 (sqrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))
(.f64 (/.f64 (sqrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (sqrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))
(.f64 (/.f64 (sqrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (pow.f64 (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2)) (/.f64 (sqrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2) x-scale) (/.f64 (cbrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2) (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (/.f64 (cbrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))) x-scale))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2) 1) (/.f64 (cbrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2) (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (/.f64 (cbrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2) (pow.f64 (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2)) (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 y-scale (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (neg.f64 x-scale))) (neg.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))
(.f64 (/.f64 y-scale (/.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) 1)) (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))
(.f64 (/.f64 y-scale (/.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (sqrt.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (sqrt.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))
(.f64 (/.f64 y-scale (/.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (pow.f64 (cbrt.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) 2))) (cbrt.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))
(.f64 (/.f64 1 (/.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) y-scale)) (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))
(.f64 (/.f64 1 (/.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (sqrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))) (sqrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))
(.f64 (/.f64 1 (/.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (pow.f64 (cbrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2))) (cbrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))
(.f64 (/.f64 (sqrt.f64 y-scale) (/.f64 x-scale (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))) (sqrt.f64 y-scale))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2) (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (cbrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 x-scale (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))) (cbrt.f64 y-scale))
(pow.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))) 1)
(pow.f64 (sqrt.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))) 2)
(pow.f64 (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))) 3)
(pow.f64 (pow.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))) 3) 1/3)
(pow.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))) -1)
(neg.f64 (/.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (neg.f64 x-scale))))
(sqrt.f64 (pow.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))) 2))
(log.f64 (pow.f64 (exp.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))))))
(cbrt.f64 (pow.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))) 3))
(cbrt.f64 (/.f64 (pow.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) 3) (pow.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) 3)))
(expm1.f64 (log1p.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(exp.f64 (log.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(exp.f64 (.f64 (log.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) 1))
(log1p.f64 (expm1.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(-.f64 (exp.f64 (log1p.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) 1)
(pow.f64 (.f64 angle (.f64 (PI.f64) 1/180)) 1)
(pow.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)
(pow.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 3)
(pow.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) 1/180)) 3) 1/3)
(sqrt.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) 1/180)) 2))
(log.f64 (pow.f64 (pow.f64 (exp.f64 angle) (PI.f64)) 1/180))
(log.f64 (+.f64 1 (expm1.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))
(cbrt.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) 1/180)) 3))
(expm1.f64 (log1p.f64 (.f64 angle (.f64 (PI.f64) 1/180))))
(exp.f64 (log.f64 (.f64 angle (.f64 (PI.f64) 1/180))))
(exp.f64 (.f64 (log.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 1))
(log1p.f64 (expm1.f64 (.f64 angle (.f64 (PI.f64) 1/180))))

Outputs
(.f64 180 (/.f64 y-scale (.f64 x-scale (*.f64 angle (PI.f64)))))
(*.f64 (/.f64 (/.f64 180 angle) (PI.f64)) (/.f64 y-scale x-scale))
(+.f64 (.f64 180 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64))))) (.f64 angle (-.f64 (.f64 -1/360 (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.f64 -1/1080 (/.f64 (.f64 y-scale (PI.f64)) x-scale)))))
(fma.f64 180 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64)))) (.f64 angle (.f64 (/.f64 y-scale (/.f64 x-scale (PI.f64))) -1/540)))
(fma.f64 180 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64)))) (.f64 angle (.f64 (*.f64 (/.f64 y-scale x-scale) (PI.f64)) -1/540)))
(fma.f64 180 (/.f64 y-scale (.f64 (PI.f64) (.f64 x-scale angle))) (.f64 (.f64 (/.f64 y-scale x-scale) (PI.f64)) (*.f64 -1/540 angle)))
(+.f64 (.f64 180 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64))))) (+.f64 (.f64 angle (-.f64 (.f64 -1/360 (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.f64 -1/1080 (/.f64 (.f64 y-scale (PI.f64)) x-scale)))) (.f64 (pow.f64 angle 3) (-.f64 (.f64 1/139968000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (+.f64 (.f64 1/699840000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/194400 (.f64 (-.f64 (.f64 -1/360 (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.f64 -1/1080 (/.f64 (*.f64 y-scale (PI.f64)) x-scale))) (pow.f64 (PI.f64) 2))))))))
(fma.f64 180 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64)))) (fma.f64 angle (.f64 (/.f64 y-scale (/.f64 x-scale (PI.f64))) -1/540) (.f64 (pow.f64 angle 3) (-.f64 (.f64 1/139968000 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 3)))) (fma.f64 1/699840000 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 3))) (.f64 -1/194400 (.f64 (.f64 (/.f64 y-scale (/.f64 x-scale (PI.f64))) -1/540) (pow.f64 (PI.f64) 2))))))))
(fma.f64 180 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64)))) (fma.f64 angle (.f64 (.f64 (/.f64 y-scale x-scale) (PI.f64)) -1/540) (.f64 (pow.f64 angle 3) (+.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) 1/174960000) (.f64 1/194400 (.f64 (.f64 (/.f64 y-scale x-scale) (PI.f64)) (*.f64 -1/540 (pow.f64 (PI.f64) 2))))))))
(fma.f64 180 (/.f64 y-scale (.f64 (PI.f64) (.f64 x-scale angle))) (fma.f64 (pow.f64 angle 3) (+.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) 1/174960000) (.f64 -1/194400 (.f64 (.f64 (pow.f64 (PI.f64) 2) (.f64 (/.f64 y-scale x-scale) (PI.f64))) 1/540))) (.f64 (.f64 (/.f64 y-scale x-scale) (PI.f64)) (*.f64 -1/540 angle))))
(+.f64 (.f64 (pow.f64 angle 5) (-.f64 (.f64 -1/136048896000000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 5)) x-scale)) (+.f64 (.f64 1/125971200000 (.f64 (-.f64 (.f64 -1/360 (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.f64 -1/1080 (/.f64 (.f64 y-scale (PI.f64)) x-scale))) (pow.f64 (PI.f64) 4))) (+.f64 (.f64 -1/194400 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 1/139968000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (+.f64 (.f64 1/699840000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/194400 (.f64 (-.f64 (.f64 -1/360 (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.f64 -1/1080 (/.f64 (.f64 y-scale (PI.f64)) x-scale))) (pow.f64 (PI.f64) 2))))))) (.f64 -1/952342272000000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 5)) x-scale)))))) (+.f64 (.f64 180 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64))))) (+.f64 (.f64 angle (-.f64 (.f64 -1/360 (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.f64 -1/1080 (/.f64 (.f64 y-scale (PI.f64)) x-scale)))) (.f64 (pow.f64 angle 3) (-.f64 (.f64 1/139968000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (+.f64 (.f64 1/699840000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/194400 (.f64 (-.f64 (.f64 -1/360 (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.f64 -1/1080 (/.f64 (.f64 y-scale (PI.f64)) x-scale))) (pow.f64 (PI.f64) 2)))))))))
(fma.f64 (pow.f64 angle 5) (-.f64 (.f64 -1/136048896000000 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 5)))) (fma.f64 1/125971200000 (.f64 (.f64 (/.f64 y-scale (/.f64 x-scale (PI.f64))) -1/540) (pow.f64 (PI.f64) 4)) (fma.f64 -1/194400 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 1/139968000 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 3)))) (fma.f64 1/699840000 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 3))) (.f64 -1/194400 (.f64 (.f64 (/.f64 y-scale (/.f64 x-scale (PI.f64))) -1/540) (pow.f64 (PI.f64) 2)))))) (/.f64 (.f64 -1/952342272000000 (.f64 y-scale (pow.f64 (PI.f64) 5))) x-scale)))) (fma.f64 180 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64)))) (fma.f64 angle (.f64 (/.f64 y-scale (/.f64 x-scale (PI.f64))) -1/540) (.f64 (pow.f64 angle 3) (-.f64 (.f64 1/139968000 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 3)))) (fma.f64 1/699840000 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 3))) (.f64 -1/194400 (.f64 (.f64 (/.f64 y-scale (/.f64 x-scale (PI.f64))) -1/540) (pow.f64 (PI.f64) 2)))))))))
(fma.f64 (pow.f64 angle 5) (-.f64 (.f64 -1/136048896000000 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 5))) (fma.f64 1/125971200000 (.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (PI.f64)) -1/540) (pow.f64 (PI.f64) 4)) (fma.f64 -1/194400 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) 1/174960000) (.f64 1/194400 (.f64 (.f64 (/.f64 y-scale x-scale) (PI.f64)) (.f64 -1/540 (pow.f64 (PI.f64) 2)))))) (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 5)) -1/952342272000000)))) (fma.f64 180 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64)))) (fma.f64 angle (.f64 (.f64 (/.f64 y-scale x-scale) (PI.f64)) -1/540) (.f64 (pow.f64 angle 3) (+.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) 1/174960000) (.f64 1/194400 (.f64 (.f64 (/.f64 y-scale x-scale) (PI.f64)) (*.f64 -1/540 (pow.f64 (PI.f64) 2)))))))))
(fma.f64 (pow.f64 angle 5) (-.f64 (fma.f64 -1/136048896000000 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 5)) (.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (PI.f64)) -1/540) -1/125971200000))) (fma.f64 (.f64 -1/194400 (pow.f64 (PI.f64) 2)) (+.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) 1/174960000) (.f64 -1/194400 (.f64 (.f64 (pow.f64 (PI.f64) 2) (.f64 (/.f64 y-scale x-scale) (PI.f64))) 1/540))) (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 5)) -1/952342272000000))) (fma.f64 180 (/.f64 y-scale (.f64 (PI.f64) (.f64 x-scale angle))) (fma.f64 (pow.f64 angle 3) (+.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) 1/174960000) (.f64 -1/194400 (.f64 (.f64 (pow.f64 (PI.f64) 2) (.f64 (/.f64 y-scale x-scale) (PI.f64))) 1/540))) (.f64 (.f64 (/.f64 y-scale x-scale) (PI.f64)) (*.f64 -1/540 angle)))))
(-.f64 (exp.f64 (log1p.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))))) 1)
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 y-scale (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 1 (.f64 x-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 y-scale (.f64 (/.f64 1 x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (.f64 y-scale (/.f64 1 (.f64 x-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (/.f64 1 (.f64 x-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 1)
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 1 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (sqrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (.f64 (sqrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (/.f64 1 (.f64 x-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (sqrt.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (sqrt.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2) (.f64 (cbrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (/.f64 1 (.f64 x-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (pow.f64 (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))) 2))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (pow.f64 (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) 2) (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (/.f64 1 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (/.f64 1 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (.f64 y-scale (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))) (/.f64 y-scale x-scale))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (.f64 y-scale (neg.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (/.f64 1 (.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (neg.f64 x-scale))))
(.f64 y-scale (.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (/.f64 1 (.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (neg.f64 x-scale)))))
(/.f64 (.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))) (neg.f64 x-scale))
(.f64 y-scale (/.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))) (neg.f64 x-scale)))
(.f64 (/.f64 y-scale 1) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (/.f64 1 x-scale) (/.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (/.f64 1 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (/.f64 1 (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (/.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (/.f64 y-scale (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (/.f64 y-scale (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2)) (/.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2)) (/.f64 y-scale (/.f64 (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))))
(.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) 2)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 1) (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) x-scale) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) y-scale)
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (/.f64 y-scale (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 1 (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (/.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (/.f64 y-scale (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 (/.f64 y-scale (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (.f64 (/.f64 1 x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) y-scale)
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (/.f64 1 (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (neg.f64 x-scale))) (.f64 y-scale (neg.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))))
(.f64 y-scale (.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (/.f64 1 (.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (neg.f64 x-scale)))))
(/.f64 (.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))) (neg.f64 x-scale))
(.f64 y-scale (/.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))) (neg.f64 x-scale)))
(.f64 (/.f64 y-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (/.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) x-scale))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (/.f64 y-scale (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 1 (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (/.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (/.f64 y-scale (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (/.f64 y-scale (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2)) (/.f64 y-scale (/.f64 (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))))
(.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) 2)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2)) (/.f64 y-scale (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2)) (/.f64 y-scale (/.f64 (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))))
(.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) 2)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 (/.f64 (sqrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) x-scale) (/.f64 (sqrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (/.f64 (sqrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (/.f64 (sqrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))) x-scale))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (/.f64 (sqrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 1) (/.f64 (sqrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (/.f64 (sqrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (sqrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (/.f64 (sqrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (pow.f64 (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2)) (/.f64 (sqrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2)) (/.f64 y-scale (/.f64 (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))))
(.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) 2)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2) x-scale) (/.f64 (cbrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2) (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (/.f64 (cbrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))) x-scale))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2) 1) (/.f64 (cbrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2) (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (/.f64 (cbrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 1 (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (/.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (/.f64 y-scale (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (/.f64 y-scale (sqrt.f64 (.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2) (pow.f64 (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2)) (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))))
(.f64 (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (/.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2) (pow.f64 (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2)))
(.f64 (cbrt.f64 (.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) (/.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) 2) (pow.f64 (cbrt.f64 (.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))) 2)))
(.f64 (/.f64 y-scale (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (neg.f64 x-scale))) (neg.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))
(.f64 y-scale (.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (/.f64 1 (.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (neg.f64 x-scale)))))
(/.f64 (.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))) (neg.f64 x-scale))
(.f64 y-scale (/.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))) (neg.f64 x-scale)))
(.f64 (/.f64 y-scale (/.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) 1)) (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (/.f64 y-scale (/.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (sqrt.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (sqrt.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (/.f64 y-scale (/.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (pow.f64 (cbrt.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) 2))) (cbrt.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (/.f64 1 (/.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) y-scale)) (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (/.f64 1 (/.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (sqrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))) (sqrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (/.f64 1 (/.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (pow.f64 (cbrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2))) (cbrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (/.f64 (sqrt.f64 y-scale) (/.f64 x-scale (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))) (sqrt.f64 y-scale))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2) (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (cbrt.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 x-scale (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))) (cbrt.f64 y-scale))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(pow.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))) 1)
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(pow.f64 (sqrt.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))) 2)
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(pow.f64 (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))) 3)
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(pow.f64 (pow.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))) 3) 1/3)
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(pow.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))) -1)
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(neg.f64 (/.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (neg.f64 x-scale))))
(.f64 y-scale (.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (/.f64 1 (.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (neg.f64 x-scale)))))
(/.f64 (.f64 (neg.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (/.f64 y-scale (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))) (neg.f64 x-scale))
(.f64 y-scale (/.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))) (neg.f64 x-scale)))
(sqrt.f64 (pow.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))) 2))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(log.f64 (pow.f64 (exp.f64 (/.f64 y-scale x-scale)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(cbrt.f64 (pow.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))) 3))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(cbrt.f64 (/.f64 (pow.f64 (.f64 y-scale (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) 3) (pow.f64 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) 3)))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(expm1.f64 (log1p.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(exp.f64 (log.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(exp.f64 (.f64 (log.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) 1))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(log1p.f64 (expm1.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(-.f64 (exp.f64 (log1p.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) 1)
(.f64 angle (.f64 (PI.f64) 1/180))
(.f64 (PI.f64) (.f64 angle 1/180))
(pow.f64 (.f64 angle (.f64 (PI.f64) 1/180)) 1)
(.f64 angle (.f64 (PI.f64) 1/180))
(.f64 (PI.f64) (.f64 angle 1/180))
(pow.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)
(.f64 angle (.f64 (PI.f64) 1/180))
(.f64 (PI.f64) (.f64 angle 1/180))
(pow.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 3)
(.f64 angle (.f64 (PI.f64) 1/180))
(.f64 (PI.f64) (.f64 angle 1/180))
(pow.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) 1/180)) 3) 1/3)
(.f64 angle (.f64 (PI.f64) 1/180))
(.f64 (PI.f64) (.f64 angle 1/180))
(sqrt.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) 1/180)) 2))
(.f64 angle (.f64 (PI.f64) 1/180))
(.f64 (PI.f64) (.f64 angle 1/180))
(log.f64 (pow.f64 (pow.f64 (exp.f64 angle) (PI.f64)) 1/180))
(*.f64 1/180 (log.f64 (pow.f64 (exp.f64 angle) (PI.f64))))
(.f64 1/180 (.f64 (PI.f64) (log.f64 (exp.f64 angle))))
(log.f64 (+.f64 1 (expm1.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))
(.f64 angle (.f64 (PI.f64) 1/180))
(.f64 (PI.f64) (.f64 angle 1/180))
(cbrt.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) 1/180)) 3))
(.f64 angle (.f64 (PI.f64) 1/180))
(.f64 (PI.f64) (.f64 angle 1/180))
(expm1.f64 (log1p.f64 (.f64 angle (.f64 (PI.f64) 1/180))))
(.f64 angle (.f64 (PI.f64) 1/180))
(.f64 (PI.f64) (.f64 angle 1/180))
(exp.f64 (log.f64 (.f64 angle (.f64 (PI.f64) 1/180))))
(.f64 angle (.f64 (PI.f64) 1/180))
(.f64 (PI.f64) (.f64 angle 1/180))
(exp.f64 (.f64 (log.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 1))
(.f64 angle (.f64 (PI.f64) 1/180))
(.f64 (PI.f64) (.f64 angle 1/180))
(log1p.f64 (expm1.f64 (.f64 angle (.f64 (PI.f64) 1/180))))
(.f64 angle (.f64 (PI.f64) 1/180))
(.f64 (PI.f64) (.f64 angle 1/180))

localize76.0ms (0.1%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	99.0%	(pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3)
✓	95.7%	(.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
	61.6%	(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
	61.4%	(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))

Compiler

Compiled 156 to 106 computations (32.1% saved)

series7.0ms (0%)

Counts

2 → 44

Calls

12 calls:

Time	Variable		Point	Expression
2.0ms	angle	@	inf	(pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3)
2.0ms	angle	@	-inf	(pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3)
1.0ms	angle	@	0	(pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3)
0.0ms	angle	@	0	(.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
0.0ms	y-scale	@	0	(.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))

rewrite120.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

404×	`distribute-lft-neg-in`
388×	`add-sqr-sqrt`
374×	`*-un-lft-identity`
372×	`pow1`
368×	`distribute-rgt-in`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	19	74
1	400	50
2	5002	50

Stop Event

1×	node limit

Counts

2 → 102

Calls

Call 1

Inputs

(*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))

(pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)

Outputs

(((-.f64 (exp.f64 (log1p.f64 (*.f64 (/.f64 y-scale x-scale) (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 y-scale (/.f64 x-scale (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 y-scale (/.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 y-scale (*.f64 x-scale (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 y-scale (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 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 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 (/.f64 y-scale x-scale) (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 (/.f64 x-scale y-scale) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (/.f64 x-scale y-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-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 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-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 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 1 (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 x-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 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 1 (/.f64 x-scale (*.f64 y-scale (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 1 (/.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 y-scale (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 (sqrt.f64 y-scale) (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 x-scale (sqrt.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 (/.f64 x-scale y-scale) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 x-scale (cbrt.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (*.f64 (/.f64 x-scale y-scale) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 (*.f64 (/.f64 y-scale x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 (*.f64 y-scale (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 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 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 (*.f64 y-scale (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 (neg.f64 y-scale) (*.f64 (neg.f64 x-scale) (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 (neg.f64 y-scale) (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 (/.f64 x-scale y-scale) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 x-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 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 (*.f64 y-scale (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 x-scale (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (sqrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 x-scale y-scale))) (sqrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 (/.f64 (*.f64 y-scale (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) x-scale)) (cbrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 (/.f64 (*.f64 y-scale (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 x-scale)) (sqrt.f64 x-scale)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 (/.f64 (*.f64 y-scale (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (cbrt.f64 (*.f64 x-scale x-scale))) (cbrt.f64 x-scale)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 (/.f64 y-scale 1) (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 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 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 (/.f64 y-scale (sqrt.f64 x-scale)) (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 x-scale))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 (/.f64 y-scale (cbrt.f64 (*.f64 x-scale x-scale))) (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (cbrt.f64 x-scale))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 1) (*.f64 (/.f64 x-scale y-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (sqrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (/.f64 x-scale y-scale) (sqrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (pow.f64 (cbrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (*.f64 (/.f64 x-scale y-scale) (cbrt.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 -1 (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 (/.f64 x-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 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 -1 (*.f64 (/.f64 x-scale y-scale) (neg.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 (*.f64 (neg.f64 y-scale) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (*.f64 (neg.f64 x-scale) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 (*.f64 (/.f64 y-scale x-scale) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((/.f64 (*.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (neg.f64 y-scale)) (neg.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((pow.f64 (*.f64 (/.f64 y-scale x-scale) (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((pow.f64 (sqrt.f64 (*.f64 (/.f64 y-scale x-scale) (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((pow.f64 (cbrt.f64 (*.f64 (/.f64 y-scale x-scale) (tan.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((pow.f64 (pow.f64 (*.f64 (/.f64 y-scale x-scale) (tan.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((neg.f64 (*.f64 (/.f64 y-scale (neg.f64 x-scale)) (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (/.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((neg.f64 (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((neg.f64 (*.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale (neg.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((neg.f64 (/.f64 (/.f64 y-scale (neg.f64 x-scale)) (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((neg.f64 (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (/.f64 x-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 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((neg.f64 (/.f64 y-scale (*.f64 (/.f64 1 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((neg.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) (*.f64 (/.f64 x-scale y-scale) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((neg.f64 (/.f64 (*.f64 (/.f64 y-scale x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((neg.f64 (/.f64 (*.f64 y-scale (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((neg.f64 (/.f64 (*.f64 y-scale (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (*.f64 x-scale (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((sqrt.f64 (pow.f64 (*.f64 (/.f64 y-scale x-scale) (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((log.f64 (pow.f64 (exp.f64 (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 (/.f64 y-scale x-scale) (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((cbrt.f64 (pow.f64 (*.f64 (/.f64 y-scale x-scale) (tan.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((cbrt.f64 (*.f64 (pow.f64 (/.f64 y-scale x-scale) 3) (pow.f64 (tan.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((cbrt.f64 (*.f64 (pow.f64 (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3) (pow.f64 (/.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>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((expm1.f64 (log1p.f64 (*.f64 (/.f64 y-scale x-scale) (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((exp.f64 (log.f64 (*.f64 (/.f64 y-scale x-scale) (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 y-scale x-scale) (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((log1p.f64 (expm1.f64 (*.f64 (/.f64 y-scale x-scale) (tan.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)))

(((-.f64 (exp.f64 (log1p.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((*.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((*.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 (neg.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((*.f64 1 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 1/6) (*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 1/6) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((*.f64 (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((*.f64 (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 (neg.f64 (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((*.f64 (pow.f64 (cbrt.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) 2) (*.f64 (cbrt.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((*.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((*.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (neg.f64 (neg.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((*.f64 (sqrt.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (neg.f64 (sqrt.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((*.f64 (*.f64 (cbrt.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (cbrt.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (neg.f64 (cbrt.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((*.f64 (*.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) 1) (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((*.f64 (*.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 1/6)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 1/6)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((*.f64 (*.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2) (pow.f64 (cbrt.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) 2)) (cbrt.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((*.f64 -1 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((*.f64 (neg.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (neg.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((*.f64 (neg.f64 (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (neg.f64 (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((*.f64 (neg.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) (neg.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((*.f64 (pow.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 1/6) 3) (pow.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 1/6) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((*.f64 (pow.f64 (pow.f64 (cbrt.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) 2) 3) (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((*.f64 (neg.f64 (sqrt.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (sqrt.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((*.f64 (neg.f64 (*.f64 (cbrt.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (cbrt.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))))) (cbrt.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((*.f64 (neg.f64 (neg.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((*.f64 (neg.f64 (neg.f64 (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) (sqrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((*.f64 (neg.f64 (neg.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 2))) (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((neg.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((sqrt.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((log.f64 (exp.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((log.f64 (+.f64 1 (expm1.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((cbrt.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((expm1.f64 (log1p.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((exp.f64 (log.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)) ((log1p.f64 (expm1.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((*.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3) (cos.f64 (*.f64 (PI.f64) (*.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 1/180 angle)))) 3)) #f)))

simplify96.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

1060×	`distribute-rgt-in`
1054×	`distribute-lft-in`
688×	`unswap-sqr`
576×	`distribute-frac-neg`
484×	`distribute-lft-neg-in`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	319	6420
1	851	6284
2	3429	6284

Stop Event

1×	node limit

Counts

146 → 148

Calls

Call 1

Inputs
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(+.f64 (.f64 1/180 (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)) (.f64 (-.f64 (.f64 -1/34992000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/11664000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale))) (pow.f64 angle 3)))
(+.f64 (.f64 1/180 (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)) (+.f64 (.f64 (-.f64 (.f64 -1/34992000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/11664000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale))) (pow.f64 angle 3)) (.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 5)) x-scale)) (+.f64 (.f64 1/4534963200000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 5)) x-scale)) (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/11664000 (/.f64 (*.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale))) (pow.f64 (PI.f64) 2))))))))
(+.f64 (.f64 1/180 (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)) (+.f64 (.f64 (-.f64 (.f64 -1/34992000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/11664000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale))) (pow.f64 angle 3)) (+.f64 (.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 5)) x-scale)) (+.f64 (.f64 1/4534963200000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 5)) x-scale)) (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/11664000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale))) (pow.f64 (PI.f64) 2)))))) (.f64 (pow.f64 angle 7) (-.f64 (.f64 -1/30855889612800000000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 7)) x-scale)) (+.f64 (.f64 -1/4407984230400000000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 7)) x-scale)) (+.f64 (.f64 1/25194240000 (.f64 (-.f64 (.f64 -1/34992000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/11664000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale))) (pow.f64 (PI.f64) 4))) (.f64 -1/64800 (.f64 (-.f64 (.f64 1/22674816000000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 5)) x-scale)) (+.f64 (.f64 1/4534963200000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 5)) x-scale)) (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/11664000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale))) (pow.f64 (PI.f64) 2))))) (pow.f64 (PI.f64) 2))))))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (pow.f64 1 1/3) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (pow.f64 1 1/3) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (pow.f64 1 1/3) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (pow.f64 1 1/3) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (pow.f64 1 1/3) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (pow.f64 1 1/3) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (pow.f64 1 1/3) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (pow.f64 1 1/3) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(-.f64 (exp.f64 (log1p.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) 1)
(/.f64 y-scale (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 y-scale (.f64 x-scale (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 y-scale (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))
(/.f64 (/.f64 y-scale x-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 x-scale y-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (/.f64 x-scale y-scale) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale y-scale))
(/.f64 1 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 x-scale y-scale)))
(/.f64 1 (/.f64 x-scale (.f64 y-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 1 (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 y-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (sqrt.f64 y-scale) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 x-scale (sqrt.f64 y-scale))))
(/.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 x-scale y-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 x-scale (cbrt.f64 y-scale))))
(/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 (/.f64 x-scale y-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(/.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale)
(/.f64 (.f64 y-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (neg.f64 y-scale) (.f64 (neg.f64 x-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (neg.f64 y-scale) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale)))
(/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 x-scale y-scale) (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 x-scale y-scale)))
(/.f64 (.f64 y-scale (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 x-scale (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale y-scale))) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (/.f64 (.f64 y-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) x-scale)) (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (/.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 x-scale)) (sqrt.f64 x-scale))
(/.f64 (/.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 (.f64 x-scale x-scale))) (cbrt.f64 x-scale))
(/.f64 (/.f64 y-scale 1) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))
(/.f64 (/.f64 y-scale (sqrt.f64 x-scale)) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 x-scale)))
(/.f64 (/.f64 y-scale (cbrt.f64 (.f64 x-scale x-scale))) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 x-scale)))
(/.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1) (.f64 (/.f64 x-scale y-scale) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (/.f64 x-scale y-scale) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (/.f64 x-scale y-scale) (cbrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 -1 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 (/.f64 x-scale y-scale))))
(/.f64 -1 (.f64 (/.f64 x-scale y-scale) (neg.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(/.f64 (.f64 (neg.f64 y-scale) (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (neg.f64 x-scale) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (neg.f64 y-scale)) (neg.f64 x-scale))
(pow.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 1)
(pow.f64 (sqrt.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 2)
(pow.f64 (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 3)
(pow.f64 (pow.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 3) 1/3)
(neg.f64 (.f64 (/.f64 y-scale (neg.f64 x-scale)) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(neg.f64 (.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (/.f64 y-scale x-scale)))
(neg.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(neg.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale (neg.f64 x-scale))))
(neg.f64 (/.f64 (/.f64 y-scale (neg.f64 x-scale)) (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(neg.f64 (/.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 x-scale y-scale)))
(neg.f64 (/.f64 y-scale (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale))))
(neg.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (/.f64 x-scale y-scale) (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(neg.f64 (/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(neg.f64 (/.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale)))
(neg.f64 (/.f64 (.f64 y-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(sqrt.f64 (pow.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2))
(log.f64 (pow.f64 (exp.f64 (/.f64 y-scale x-scale)) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(cbrt.f64 (pow.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 3))
(cbrt.f64 (.f64 (pow.f64 (/.f64 y-scale x-scale) 3) (pow.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 3)))
(cbrt.f64 (.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 3) (pow.f64 (/.f64 y-scale x-scale) 3)))
(expm1.f64 (log1p.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(exp.f64 (log.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(exp.f64 (.f64 (log.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 1))
(log1p.f64 (expm1.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(-.f64 (exp.f64 (log1p.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 1)
(.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2))
(.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (neg.f64 (neg.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2))))
(.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 1)
(.f64 1 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1/6) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1/6) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))
(.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (neg.f64 (neg.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 (pow.f64 (cbrt.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2) (.f64 (cbrt.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (neg.f64 (neg.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 (sqrt.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (sqrt.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 (.f64 (cbrt.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (neg.f64 (cbrt.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(.f64 (.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) 1) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1/6)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1/6))
(.f64 (.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (cbrt.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2)) (cbrt.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 -1 (neg.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (neg.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2)))
(.f64 (neg.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (neg.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (neg.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (pow.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1/6) 3) (pow.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 1/6) 3))
(.f64 (pow.f64 (pow.f64 (cbrt.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2) 3) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (neg.f64 (sqrt.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (sqrt.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (neg.f64 (.f64 (cbrt.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (cbrt.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (neg.f64 (neg.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2))
(.f64 (neg.f64 (neg.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (neg.f64 (neg.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(neg.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(sqrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(log.f64 (exp.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(log.f64 (+.f64 1 (expm1.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(cbrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(expm1.f64 (log1p.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(exp.f64 (log.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(exp.f64 (.f64 (log.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 1))
(log1p.f64 (expm1.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))

Outputs
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 1/180 (/.f64 (.f64 y-scale (*.f64 angle (PI.f64))) x-scale))
(.f64 1/180 (/.f64 y-scale (/.f64 x-scale (.f64 angle (PI.f64)))))
(/.f64 (.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) y-scale) x-scale)
(/.f64 (.f64 (.f64 angle (*.f64 1/180 (PI.f64))) y-scale) x-scale)
(+.f64 (.f64 1/180 (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)) (.f64 (-.f64 (.f64 -1/34992000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/11664000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale))) (pow.f64 angle 3)))
(fma.f64 1/180 (/.f64 y-scale (/.f64 x-scale (.f64 angle (PI.f64)))) (.f64 (*.f64 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 3))) 1/17496000) (pow.f64 angle 3)))
(fma.f64 1/180 (.f64 (/.f64 y-scale x-scale) (.f64 angle (PI.f64))) (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) (*.f64 1/17496000 (pow.f64 angle 3))))
(+.f64 (.f64 1/180 (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)) (+.f64 (.f64 (-.f64 (.f64 -1/34992000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/11664000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale))) (pow.f64 angle 3)) (.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 5)) x-scale)) (+.f64 (.f64 1/4534963200000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 5)) x-scale)) (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/11664000 (/.f64 (*.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale))) (pow.f64 (PI.f64) 2))))))))
(fma.f64 1/180 (/.f64 y-scale (/.f64 x-scale (.f64 angle (PI.f64)))) (fma.f64 (.f64 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 3))) 1/17496000) (pow.f64 angle 3) (.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 5)))) (fma.f64 1/4534963200000 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 5))) (.f64 -1/64800 (.f64 (*.f64 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 3))) 1/17496000) (pow.f64 (PI.f64) 2))))))))
(fma.f64 1/180 (.f64 (/.f64 y-scale x-scale) (.f64 angle (PI.f64))) (fma.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) 1/17496000) (pow.f64 angle 3) (.f64 (pow.f64 angle 5) (+.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 5)) -1/5668704000000) (.f64 1/64800 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) (*.f64 1/17496000 (pow.f64 (PI.f64) 2))))))))
(fma.f64 1/180 (.f64 (/.f64 y-scale x-scale) (.f64 angle (PI.f64))) (fma.f64 (pow.f64 angle 5) (+.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 5)) -1/5668704000000) (.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) (.f64 1/17496000 (pow.f64 (PI.f64) 2))) 1/64800)) (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) (*.f64 1/17496000 (pow.f64 angle 3)))))
(+.f64 (.f64 1/180 (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale)) (+.f64 (.f64 (-.f64 (.f64 -1/34992000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/11664000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale))) (pow.f64 angle 3)) (+.f64 (.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 5)) x-scale)) (+.f64 (.f64 1/4534963200000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 5)) x-scale)) (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/11664000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale))) (pow.f64 (PI.f64) 2)))))) (.f64 (pow.f64 angle 7) (-.f64 (.f64 -1/30855889612800000000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 7)) x-scale)) (+.f64 (.f64 -1/4407984230400000000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 7)) x-scale)) (+.f64 (.f64 1/25194240000 (.f64 (-.f64 (.f64 -1/34992000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/11664000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale))) (pow.f64 (PI.f64) 4))) (.f64 -1/64800 (.f64 (-.f64 (.f64 1/22674816000000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 5)) x-scale)) (+.f64 (.f64 1/4534963200000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 5)) x-scale)) (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/34992000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale)) (.f64 -1/11664000 (/.f64 (.f64 y-scale (pow.f64 (PI.f64) 3)) x-scale))) (pow.f64 (PI.f64) 2))))) (pow.f64 (PI.f64) 2))))))))))
(fma.f64 1/180 (/.f64 y-scale (/.f64 x-scale (.f64 angle (PI.f64)))) (fma.f64 (.f64 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 3))) 1/17496000) (pow.f64 angle 3) (fma.f64 (pow.f64 angle 5) (-.f64 (.f64 1/22674816000000 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 5)))) (fma.f64 1/4534963200000 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 5))) (.f64 -1/64800 (.f64 (.f64 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 3))) 1/17496000) (pow.f64 (PI.f64) 2))))) (.f64 (pow.f64 angle 7) (-.f64 (/.f64 (.f64 -1/30855889612800000000 (.f64 y-scale (pow.f64 (PI.f64) 7))) x-scale) (fma.f64 -1/4407984230400000000 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 7))) (fma.f64 1/25194240000 (.f64 (.f64 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 3))) 1/17496000) (pow.f64 (PI.f64) 4)) (.f64 (.f64 -1/64800 (-.f64 (.f64 1/22674816000000 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 5)))) (fma.f64 1/4534963200000 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 5))) (.f64 -1/64800 (.f64 (*.f64 (/.f64 y-scale (/.f64 x-scale (pow.f64 (PI.f64) 3))) 1/17496000) (pow.f64 (PI.f64) 2)))))) (pow.f64 (PI.f64) 2)))))))))
(fma.f64 1/180 (.f64 (/.f64 y-scale x-scale) (.f64 angle (PI.f64))) (fma.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) 1/17496000) (pow.f64 angle 3) (fma.f64 (pow.f64 angle 5) (+.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 5)) -1/5668704000000) (.f64 1/64800 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) (.f64 1/17496000 (pow.f64 (PI.f64) 2))))) (.f64 (pow.f64 angle 7) (-.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 7)) 1/5142648268800000000) (fma.f64 1/25194240000 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) (.f64 1/17496000 (pow.f64 (PI.f64) 4))) (.f64 (pow.f64 (PI.f64) 2) (.f64 -1/64800 (+.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 5)) -1/5668704000000) (.f64 1/64800 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) (.f64 1/17496000 (pow.f64 (PI.f64) 2)))))))))))))
(fma.f64 1/180 (.f64 (/.f64 y-scale x-scale) (.f64 angle (PI.f64))) (fma.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) 1/17496000) (pow.f64 angle 3) (fma.f64 (pow.f64 angle 7) (-.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 7)) 1/5142648268800000000) (fma.f64 (.f64 -1/64800 (+.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 5)) -1/5668704000000) (.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) (.f64 1/17496000 (pow.f64 (PI.f64) 2))) 1/64800))) (pow.f64 (PI.f64) 2) (.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) 1/17496000) (.f64 (pow.f64 (PI.f64) 4) 1/25194240000)))) (.f64 (pow.f64 angle 5) (+.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 5)) -1/5668704000000) (.f64 (.f64 (.f64 (/.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)) (.f64 1/17496000 (pow.f64 (PI.f64) 2))) 1/64800))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (pow.f64 1 1/3) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (pow.f64 1 1/3) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (pow.f64 1 1/3) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (pow.f64 1 1/3) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (pow.f64 1 1/3) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (pow.f64 1 1/3) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (pow.f64 1 1/3) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (pow.f64 1 1/3) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(-.f64 (exp.f64 (log1p.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) 1)
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(/.f64 y-scale (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 y-scale (.f64 x-scale (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(/.f64 y-scale (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(/.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 x-scale y-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2))))
(/.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale y-scale)) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2)))
(.f64 (/.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale y-scale))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))
(.f64 (/.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 x-scale y-scale))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (/.f64 x-scale y-scale) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 x-scale y-scale)))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale y-scale))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(/.f64 1 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 x-scale y-scale)))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(/.f64 1 (/.f64 x-scale (.f64 y-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(/.f64 1 (/.f64 (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 y-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (sqrt.f64 y-scale) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 x-scale (sqrt.f64 y-scale))))
(/.f64 (sqrt.f64 y-scale) (/.f64 (.f64 1 (/.f64 x-scale (sqrt.f64 y-scale))) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 (sqrt.f64 y-scale) (/.f64 x-scale (sqrt.f64 y-scale))) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 (sqrt.f64 y-scale) (/.f64 x-scale (sqrt.f64 y-scale))) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(/.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 x-scale y-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 x-scale (cbrt.f64 y-scale))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 x-scale (cbrt.f64 y-scale))) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 x-scale (cbrt.f64 y-scale))) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 (/.f64 x-scale y-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(/.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale y-scale)) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2)))
(.f64 (/.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale y-scale))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))
(.f64 (/.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 x-scale y-scale))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale)
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (neg.f64 y-scale) (.f64 (neg.f64 x-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(/.f64 (neg.f64 y-scale) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale)))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 x-scale y-scale) (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 x-scale y-scale)))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 y-scale (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 x-scale (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale y-scale))) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (/.f64 x-scale y-scale) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 x-scale (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) y-scale)
(/.f64 (/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (sqrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (sqrt.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (/.f64 (.f64 y-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) x-scale)) (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2))))
(.f64 (/.f64 y-scale (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))))
(.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (/.f64 y-scale (.f64 x-scale (pow.f64 (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2))))
(/.f64 (/.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 x-scale)) (sqrt.f64 x-scale))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(/.f64 (/.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 (.f64 x-scale x-scale))) (cbrt.f64 x-scale))
(/.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (cbrt.f64 x-scale) (cbrt.f64 (*.f64 x-scale x-scale))))
(.f64 (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cbrt.f64 x-scale)) (/.f64 y-scale (cbrt.f64 (.f64 x-scale x-scale))))
(.f64 (/.f64 y-scale (cbrt.f64 x-scale)) (/.f64 (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cbrt.f64 (.f64 x-scale x-scale))))
(/.f64 (/.f64 y-scale 1) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) x-scale))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(/.f64 (/.f64 y-scale (sqrt.f64 x-scale)) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 x-scale)))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(/.f64 (/.f64 y-scale (cbrt.f64 (.f64 x-scale x-scale))) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 x-scale)))
(/.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (cbrt.f64 x-scale) (cbrt.f64 (*.f64 x-scale x-scale))))
(.f64 (/.f64 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cbrt.f64 x-scale)) (/.f64 y-scale (cbrt.f64 (.f64 x-scale x-scale))))
(.f64 (/.f64 y-scale (cbrt.f64 x-scale)) (/.f64 (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cbrt.f64 (.f64 x-scale x-scale))))
(/.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1) (.f64 (/.f64 x-scale y-scale) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (/.f64 x-scale y-scale) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 x-scale (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) y-scale)
(/.f64 (/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (sqrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (sqrt.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (/.f64 x-scale y-scale) (cbrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (.f64 y-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2))))
(.f64 (/.f64 y-scale (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))))
(.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (/.f64 y-scale (.f64 x-scale (pow.f64 (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2))))
(/.f64 -1 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 (/.f64 x-scale y-scale))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(/.f64 -1 (.f64 (/.f64 x-scale y-scale) (neg.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(/.f64 (.f64 (neg.f64 y-scale) (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (neg.f64 x-scale) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(/.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (neg.f64 y-scale)) (neg.f64 x-scale))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(pow.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 1)
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(pow.f64 (sqrt.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 2)
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(pow.f64 (cbrt.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 3)
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(pow.f64 (pow.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 3) 1/3)
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(neg.f64 (.f64 (/.f64 y-scale (neg.f64 x-scale)) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(neg.f64 (.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (/.f64 y-scale x-scale)))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(neg.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(neg.f64 (.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 y-scale (neg.f64 x-scale))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(neg.f64 (/.f64 (/.f64 y-scale (neg.f64 x-scale)) (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(neg.f64 (/.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 x-scale y-scale)))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(neg.f64 (/.f64 y-scale (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(neg.f64 (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (/.f64 x-scale y-scale) (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(neg.f64 (/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (neg.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(neg.f64 (/.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (neg.f64 x-scale)))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(neg.f64 (/.f64 (.f64 y-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (neg.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(/.f64 (.f64 (/.f64 y-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (/.f64 y-scale x-scale) (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(sqrt.f64 (pow.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2))
(fabs.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(fabs.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(log.f64 (pow.f64 (exp.f64 (/.f64 y-scale x-scale)) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(cbrt.f64 (pow.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 3))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(cbrt.f64 (.f64 (pow.f64 (/.f64 y-scale x-scale) 3) (pow.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 3)))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(cbrt.f64 (.f64 (pow.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 3) (pow.f64 (/.f64 y-scale x-scale) 3)))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(expm1.f64 (log1p.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(exp.f64 (log.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(exp.f64 (.f64 (log.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 1))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(log1p.f64 (expm1.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(-.f64 (exp.f64 (log1p.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 1)
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (neg.f64 (neg.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 1)
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 1 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1/6) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1/6) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1/6) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1/6)))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 1/6) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 1/6)))
(.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (neg.f64 (neg.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (pow.f64 (cbrt.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2) (.f64 (cbrt.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (neg.f64 (neg.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (sqrt.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (sqrt.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (.f64 (cbrt.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (neg.f64 (cbrt.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) 1) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1/6)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1/6))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1/6) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1/6)))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 1/6) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 1/6)))
(.f64 (.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (cbrt.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2)) (cbrt.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 -1 (neg.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (neg.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2)))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (neg.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (neg.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (neg.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (neg.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (pow.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1/6) 3) (pow.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 1/6) 3))
(pow.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1/6) 6)
(pow.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 1/6) 6)
(.f64 (pow.f64 (pow.f64 (cbrt.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2) 3) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (neg.f64 (sqrt.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (sqrt.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (neg.f64 (.f64 (cbrt.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (cbrt.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (neg.f64 (neg.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (neg.f64 (neg.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (neg.f64 (neg.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(neg.f64 (neg.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(sqrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(fabs.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(fabs.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))
(log.f64 (exp.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(log.f64 (+.f64 1 (expm1.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(cbrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(expm1.f64 (log1p.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(exp.f64 (log.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(exp.f64 (.f64 (log.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 1))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(log1p.f64 (expm1.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))

eval622.0ms (0.4%)

Compiler: Compiled 32772 to 21496 computations (34.4% saved)

prune599.0ms (0.4%)

Pruning

109 alts after pruning (107 fresh and 2 done)

	Pruned	Kept	Total
New	1102	42	1144
Fresh	27	65	92
Picked	1	0	1
Done	2	2	4
Total	1132	109	1241

Accurracy

84.8%

Counts

1241 → 109

Alt Table

Click to see full alt table

Status	Accuracy	Program
	11.4%	(/.f64 180 (/.f64 (PI.f64) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180))))
	11.4%	(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
	11.4%	(.f64 (/.f64 1 (PI.f64)) (.f64 180 (atan.f64 (*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64))))))
	38.4%	(.f64 (atan.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 3)) (/.f64 180 (PI.f64)))
	41.1%	(.f64 (atan.f64 (/.f64 (.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 180 (PI.f64)))
	38.4%	(.f64 (atan.f64 (/.f64 (.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) (/.f64 180 (PI.f64)))
	38.2%	(.f64 (atan.f64 (/.f64 (.f64 y-scale -180) (.f64 angle (.f64 (PI.f64) x-scale)))) (/.f64 180 (PI.f64)))
	38.2%	(.f64 (atan.f64 (/.f64 (.f64 -180 y-scale) (.f64 (.f64 x-scale angle) (PI.f64)))) (/.f64 180 (PI.f64)))
	38.5%	(.f64 (atan.f64 (/.f64 1 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) y-scale))) (/.f64 180 (PI.f64)))
	19.9%	(.f64 (atan.f64 (.f64 (/.f64 (sqrt.f64 y-scale) (.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (/.f64 x-scale (cos.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))) (sqrt.f64 y-scale))) (/.f64 180 (PI.f64)))
	18.3%	(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (/.f64 180 (PI.f64)))
	18.0%	(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 1 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))))) (/.f64 180 (PI.f64)))
	22.9%	(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (/.f64 1/360 (/.f64 (.f64 b b) (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (.f64 (*.f64 x-scale x-scale) angle))))))) (/.f64 180 (PI.f64)))
	43.8%	(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))) (/.f64 180 (PI.f64)))
	44.7%	(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (.f64 -1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 180 (PI.f64)))
	50.9%	(.f64 (atan.f64 (.f64 y-scale (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))))) (/.f64 180 (PI.f64)))
	37.5%	(.f64 (atan.f64 (.f64 y-scale (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle)))))) (/.f64 180 (PI.f64)))
	33.6%	(.f64 (atan.f64 (.f64 y-scale (neg.f64 (pow.f64 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3) 1/3)))) (/.f64 180 (PI.f64)))
	38.8%	(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 180 (PI.f64)))
	43.6%	(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (/.f64 180 (PI.f64)))
	21.3%	(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (exp.f64 (log.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (/.f64 180 (PI.f64)))
	46.1%	(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 1 x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
	43.8%	(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))))) (/.f64 180 (PI.f64)))
	38.2%	(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 180 (.f64 (.f64 x-scale angle) (PI.f64)))))) (/.f64 180 (PI.f64)))
	42.8%	(.f64 (atan.f64 (.f64 y-scale (neg.f64 (.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))) (/.f64 180 (PI.f64)))
	22.5%	(.f64 (atan.f64 (.f64 y-scale (neg.f64 (.f64 (/.f64 (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))))) (/.f64 180 (PI.f64)))
	42.8%	(.f64 (atan.f64 (.f64 y-scale (neg.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 1 x-scale))))) (/.f64 180 (PI.f64)))
	21.1%	(.f64 (atan.f64 (.f64 y-scale (neg.f64 (exp.f64 (log.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))) (/.f64 180 (PI.f64)))
	21.8%	(.f64 (atan.f64 (.f64 y-scale (cbrt.f64 (pow.f64 (.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (/.f64 (/.f64 (.f64 x-scale -1) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) 3)))) (/.f64 180 (PI.f64)))
	24.1%	(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (pow.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
	45.2%	(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (pow.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 3))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
	45.2%	(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (pow.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 3)))))) (/.f64 180 (PI.f64)))
	44.2%	(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))) (/.f64 180 (PI.f64)))
	29.7%	(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) 1/180)) 3))))))) (/.f64 180 (PI.f64)))
	39.5%	(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (expm1.f64 (log1p.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
	46.1%	(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale 1) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
	39.4%	(.f64 (atan.f64 (.f64 -1 (*.f64 (/.f64 (/.f64 180 angle) (PI.f64)) (/.f64 y-scale x-scale)))) (/.f64 180 (PI.f64)))
	45.0%	(.f64 (atan.f64 (.f64 -1 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))) (/.f64 y-scale x-scale)))) (/.f64 180 (PI.f64)))
	43.8%	(.f64 (atan.f64 (.f64 -1 (.f64 (/.f64 1 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (.f64 y-scale (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))))) (/.f64 180 (PI.f64)))
	29.7%	(.f64 (atan.f64 (.f64 -1 (exp.f64 (log.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))))))) (/.f64 180 (PI.f64)))
	38.2%	(.f64 (atan.f64 (.f64 -180 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64)))))) (/.f64 180 (PI.f64)))
	39.4%	(.f64 180 (/.f64 (atan.f64 (pow.f64 (pow.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3) 1/3)) (PI.f64)))
	49.0%	(*.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 (/.f64 180 angle) (PI.f64)))) (PI.f64)))
✓	52.2%	(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) (PI.f64)))
	44.7%	(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 1 (tan.f64 (expm1.f64 (log1p.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))) (PI.f64)))
	47.6%	(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 1 (fabs.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))) (PI.f64)))
	43.8%	(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale x-scale) (sqrt.f64 (pow.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) -2)))) (PI.f64)))
	36.3%	(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale x-scale) (log1p.f64 (expm1.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))) (PI.f64)))
	42.8%	(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) y-scale) x-scale)) (PI.f64)))
	50.0%	(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 (cbrt.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 x-scale (cbrt.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))) (PI.f64)))
	50.1%	(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale)) (PI.f64)))
	17.8%	(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 -1/2 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
	11.4%	(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 -180 x-scale) (.f64 y-scale (.f64 angle (PI.f64))))) (PI.f64)))
	50.9%	(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 3))) (PI.f64)))
	50.9%	(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 1 x-scale)))) (PI.f64)))
	21.9%	(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (tan.f64 (pow.f64 (pow.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 3) 1/3))))) (PI.f64)))
	50.5%	(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (tan.f64 (pow.f64 (cbrt.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 3))))) (PI.f64)))
	48.7%	(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 angle (log.f64 (exp.f64 1/180)))))))) (PI.f64)))
✓	50.9%	(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) (PI.f64)))
	50.1%	(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))) (PI.f64)))
	43.4%	(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (tan.f64 (expm1.f64 (log1p.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))) (PI.f64)))
	50.9%	(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (log1p.f64 (expm1.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))) (PI.f64)))
	47.3%	(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (fabs.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))) (PI.f64)))
	50.1%	(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (PI.f64)))
	43.6%	(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (.f64 180 (/.f64 (/.f64 x-scale angle) (PI.f64))))) (PI.f64)))
	40.3%	(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (sqrt.f64 (pow.f64 (/.f64 x-scale (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) (PI.f64)))
	44.5%	(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (fabs.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))) (PI.f64)))
	24.9%	(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (exp.f64 (log.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))) (PI.f64)))
	51.9%	(.f64 180 (/.f64 (atan.f64 (/.f64 1 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale y-scale)))) (PI.f64)))
	43.6%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 (*.f64 y-scale 1/180) (/.f64 x-scale angle)) (PI.f64))) (PI.f64)))
	50.9%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3) 1))) (PI.f64)))
	45.4%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (fabs.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) 3) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
	21.6%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (pow.f64 (pow.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 3) 1/3)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
	31.8%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (pow.f64 (sqrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
	49.5%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (pow.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
	48.2%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle (log.f64 (exp.f64 1/180))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
	50.3%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (pow.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3))))) (PI.f64)))
	50.1%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 angle (log.f64 (exp.f64 1/180)))))))) (PI.f64)))
	51.0%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1))) (PI.f64)))
	51.4%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
	42.1%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (expm1.f64 (log1p.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
	30.2%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (exp.f64 (log.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
	45.4%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (fabs.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
	51.3%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (PI.f64)))
	51.4%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (PI.f64)))
	44.1%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (PI.f64)))
	50.9%	(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 1 (pow.f64 (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2)) (/.f64 y-scale (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))) (PI.f64)))
	39.5%	(.f64 180 (/.f64 (atan.f64 (.f64 (.f64 -1/2 (/.f64 (.f64 2 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale)))) (*.f64 y-scale x-scale))) (PI.f64)))
	41.6%	(.f64 180 (/.f64 (atan.f64 (.f64 (.f64 -1/2 (/.f64 -2 (/.f64 (.f64 x-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (*.f64 y-scale x-scale))) (PI.f64)))
	10.8%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (.f64 (/.f64 (.f64 angle (PI.f64)) 1) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))))) (PI.f64)))
	8.6%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 x-scale (*.f64 angle (PI.f64)))))))) (PI.f64)))
	38.7%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 -2 (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale)))) (PI.f64)))
	10.0%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle)) y-scale))) (PI.f64)))
	1.9%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (/.f64 (.f64 a a) angle) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b)))))))) (PI.f64)))
	12.5%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))) (PI.f64)))
	32.1%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (+.f64 a b))) (-.f64 b a)) y-scale))))) (PI.f64)))
	11.4%	(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (.f64 (/.f64 (/.f64 1 y-scale) (*.f64 angle (PI.f64))) x-scale)))) (PI.f64)))
	43.6%	(.f64 180 (/.f64 (atan.f64 (.f64 1/180 (/.f64 y-scale (*.f64 (/.f64 1 angle) (/.f64 x-scale (PI.f64)))))) (PI.f64)))
	39.3%	(.f64 180 (/.f64 (atan.f64 (.f64 1/180 (/.f64 y-scale (fabs.f64 (/.f64 (/.f64 x-scale angle) (PI.f64)))))) (PI.f64)))
	44.5%	(.f64 180 (/.f64 (atan.f64 (.f64 1/180 (.f64 (/.f64 y-scale (/.f64 x-scale (pow.f64 (cbrt.f64 (.f64 angle (PI.f64))) 2))) (cbrt.f64 (*.f64 angle (PI.f64)))))) (PI.f64)))
	38.9%	(.f64 180 (/.f64 (atan.f64 (.f64 1/180 (fabs.f64 (.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))))) (PI.f64)))
	18.5%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (*.f64 b b))))))) (PI.f64)))
	29.3%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))))) (PI.f64)))
	43.9%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))) (PI.f64)))
	27.0%	(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (log1p.f64 (expm1.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (*.f64 a (neg.f64 a)))))))))) (PI.f64)))
	23.5%	(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 y-scale (/.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 b b))))) (PI.f64)))
	48.9%	(.f64 180 (/.f64 (atan.f64 (neg.f64 (.f64 (/.f64 (.f64 y-scale 1/180) (neg.f64 x-scale)) (.f64 angle (PI.f64))))) (PI.f64)))
	44.8%	(.f64 180 (/.f64 (atan.f64 (fabs.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (PI.f64)))
	36.1%	(.f64 180 (/.f64 (atan.f64 (exp.f64 (log.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (PI.f64)))

Compiler

Compiled 3256 to 2504 computations (23.1% saved)

regimes9.6s (6.4%)

Counts

217 → 6

Calls

Call 1

Inputs
(.f64 180 (/.f64 (atan.f64 (.f64 1/180 (/.f64 y-scale (/.f64 x-scale (*.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 1/180 (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 (*.f64 y-scale 1/180) (/.f64 x-scale angle)) (PI.f64))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (.f64 180 (/.f64 (/.f64 x-scale angle) (PI.f64))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 -180 x-scale) (.f64 y-scale (.f64 angle (PI.f64))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 (.f64 1/180 (.f64 y-scale angle)) (PI.f64)) x-scale)) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) y-scale) x-scale)) (PI.f64)))
(*.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 (/.f64 180 angle) (PI.f64)))) (PI.f64)))
(.f64 (atan.f64 (.f64 -180 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64)))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (/.f64 (.f64 -180 y-scale) (.f64 (.f64 x-scale angle) (PI.f64)))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (/.f64 (.f64 y-scale -180) (.f64 angle (.f64 (PI.f64) x-scale)))) (/.f64 180 (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(/.f64 180 (/.f64 (PI.f64) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180))))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 180 (.f64 (.f64 x-scale angle) (PI.f64)))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (neg.f64 (.f64 (/.f64 (.f64 y-scale 1/180) (neg.f64 x-scale)) (.f64 angle (PI.f64))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 1/180 (/.f64 y-scale (*.f64 (/.f64 1 angle) (/.f64 x-scale (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 -2 (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (.f64 x-scale (.f64 (*.f64 angle (PI.f64)) -1/2))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (neg.f64 x-scale) (*.f64 (PI.f64) (neg.f64 angle))))) (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (*.f64 (/.f64 (/.f64 180 angle) (PI.f64)) (/.f64 y-scale x-scale)))) (/.f64 180 (PI.f64)))
(.f64 (/.f64 1 (PI.f64)) (.f64 180 (atan.f64 (*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64))))))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (.f64 (/.f64 (/.f64 1 y-scale) (*.f64 angle (PI.f64))) x-scale)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 x-scale (*.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 y-scale (/.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 b b))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 -180 (/.f64 (.f64 (.f64 (.f64 angle x-scale) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 b (.f64 b y-scale))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (.f64 -180 (/.f64 (.f64 b b) (.f64 (.f64 x-scale angle) (.f64 (-.f64 (.f64 b b) (*.f64 a a)) (PI.f64))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (.f64 -180 (/.f64 (/.f64 (.f64 b b) (.f64 x-scale angle)) (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (.f64 360 (.f64 (/.f64 b angle) (/.f64 b (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (+.f64 a b))) (-.f64 b a)) y-scale))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64))) x-scale)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (/.f64 (.f64 a a) angle) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b)))))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (/.f64 1/360 (/.f64 (.f64 b b) (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (.f64 (*.f64 x-scale x-scale) angle))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 y-scale (.f64 (/.f64 2 (PI.f64)) (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (*.f64 a a))) (/.f64 x-scale angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale 2)) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle)) y-scale))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))) x-scale)))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (.f64 90 (.f64 (/.f64 x-scale angle) (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (/.f64 180 (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (.f64 90 (/.f64 2 (/.f64 (.f64 (.f64 angle (-.f64 (.f64 b b) (.f64 a a))) (PI.f64)) (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 b (/.f64 (.f64 x-scale x-scale) b)))))))))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (neg.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (/.f64 (/.f64 y-scale angle) (.f64 (PI.f64) (neg.f64 (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (.f64 (/.f64 (.f64 angle (PI.f64)) 1) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 1/180 (fabs.f64 (.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 1/180 (/.f64 y-scale (fabs.f64 (/.f64 (/.f64 x-scale angle) (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale)) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 1 (/.f64 x-scale (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 1 x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 1 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale y-scale)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 1 x-scale)))) (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale 1) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (*.f64 angle (PI.f64))) x-scale))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 -1 (.f64 (/.f64 x-scale y-scale) (neg.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (fabs.f64 (.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (fabs.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (fabs.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (fabs.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 1 (fabs.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (log.f64 (exp.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (exp.f64 (log.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (log.f64 (exp.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (/.f64 angle x-scale)) (/.f64 (cbrt.f64 y-scale) (.f64 1/2 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (exp.f64 (log.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (exp.f64 (log.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (log1p.f64 (expm1.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (tan.f64 (expm1.f64 (log1p.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 angle (log.f64 (exp.f64 1/180)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (sqrt.f64 (pow.f64 (/.f64 x-scale (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (tan.f64 (pow.f64 (cbrt.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 3))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 3))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale x-scale) (sqrt.f64 (pow.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) -2)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (tan.f64 (pow.f64 (pow.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 3) 1/3))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale x-scale) (log1p.f64 (expm1.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 1 (tan.f64 (expm1.f64 (log1p.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (pow.f64 (pow.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3) 1/3)) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3) 1))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (sqrt.f64 y-scale) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sqrt.f64 y-scale))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale (sqrt.f64 x-scale)) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 x-scale)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle)))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (/.f64 (.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (/.f64 (.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (neg.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))) (/.f64 y-scale x-scale)))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (/.f64 1 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) y-scale))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 1 x-scale))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (.f64 (/.f64 1 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (.f64 y-scale (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (.f64 -1/2 (/.f64 -2 (/.f64 (.f64 x-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (*.f64 y-scale x-scale))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (.f64 -1/2 (/.f64 (.f64 2 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale)))) (*.f64 y-scale x-scale))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (.f64 -1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 1/2 (.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) (/.f64 180 (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (/.f64 (.f64 2 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 b (/.f64 (.f64 x-scale x-scale) b)))) (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))))))))
(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (cbrt.f64 x-scale))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (cbrt.f64 y-scale)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 1/180 (.f64 (/.f64 y-scale (/.f64 x-scale (pow.f64 (cbrt.f64 (.f64 angle (PI.f64))) 2))) (cbrt.f64 (*.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (fabs.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (fabs.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fabs.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (fabs.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (exp.f64 (log.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (expm1.f64 (log1p.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (exp.f64 (log.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 angle (log.f64 (exp.f64 1/180)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle (log.f64 (exp.f64 1/180))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (pow.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (pow.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (pow.f64 (sqrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (exp.f64 (log.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (exp.f64 (log.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 3)) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (pow.f64 (pow.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 3) 1/3)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (exp.f64 (log.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (expm1.f64 (log1p.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 (/.f64 (sqrt.f64 y-scale) (.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (/.f64 x-scale (cos.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))) (sqrt.f64 y-scale))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) 1/180)) 3))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (pow.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 3)))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (pow.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 3))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (pow.f64 (sqrt.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (pow.f64 (pow.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3) 1/3)))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (fabs.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) 3) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (pow.f64 (cbrt.f64 x-scale) 2))) (cbrt.f64 x-scale))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 1 (pow.f64 (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2)) (/.f64 y-scale (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (cbrt.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (.f64 (/.f64 (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) x-scale)))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 b b (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (*.f64 b b))))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 1 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 1 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (.f64 (/.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 (cbrt.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 x-scale (cbrt.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (.f64 (/.f64 (/.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (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 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (+.f64 0 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) (+.f64 angle angle)))) 1/2)))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (.f64 -1/2 (/.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 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 a a)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (*.f64 y-scale x-scale))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 -1/2 (.f64 x-scale (.f64 y-scale (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (-.f64 (.f64 b b) (*.f64 a a)))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (.f64 -1/2 (.f64 (/.f64 x-scale (-.f64 (.f64 b b) (.f64 a a))) (/.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))))) (/.f64 180 (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (.f64 -1/2 (/.f64 2 (/.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 a a))))))))))
(.f64 (atan.f64 (.f64 y-scale (/.f64 (neg.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))))))) (/.f64 180 (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (/.f64 (neg.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a)))))) (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))))))))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) x-scale)))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (.f64 2 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/90))))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2)))) (/.f64 (/.f64 1 (.f64 (+.f64 0 (sin.f64 (.f64 (PI.f64) (.f64 (.f64 1/180 angle) 2)))) 1/2)) (neg.f64 (-.f64 (.f64 b b) (*.f64 a a)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (neg.f64 (.f64 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (/.f64 (/.f64 (.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))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (cbrt.f64 (pow.f64 (.f64 (+.f64 (.f64 (/.f64 b (.f64 x-scale (/.f64 x-scale b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (/.f64 a (/.f64 x-scale a)) x-scale))) (/.f64 (/.f64 (.f64 x-scale -1) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) 3)))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (fma.f64 -1/2 (.f64 angle (+.f64 (.f64 180 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/16200 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 -64800 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 3) -1/8748000)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (pow.f64 (PI.f64) 2))))))) (.f64 -180 (/.f64 y-scale (/.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (*.f64 b b)))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (.f64 (/.f64 (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (/.f64 (sqrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (.f64 (/.f64 (pow.f64 (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) 2) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (cbrt.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (log1p.f64 (expm1.f64 (/.f64 (+.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (.f64 b b)) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) (+.f64 angle angle)))) 1/2) (fma.f64 b b (*.f64 a (neg.f64 a)))))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 1 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1) (-.f64 (.f64 b b) (.f64 a a))))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (fma.f64 -1 (.f64 (.f64 b b) (-.f64 (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (.f64 a (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (.f64 a a)))))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (.f64 -1/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 1 2)))) (.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (*.f64 y-scale x-scale))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) (.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))) 2)) (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale)) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))) 2)))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (sqrt.f64 (pow.f64 (.f64 2 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/90)))))) 2))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (pow.f64 (/.f64 (.f64 (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2))) 1/2) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (-.f64 (.f64 b b) (.f64 a a)))) -1)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (pow.f64 (/.f64 (hypot.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) (sqrt.f64 (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2)))) (sqrt.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/90)))))) 2)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (log1p.f64 (expm1.f64 (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) a) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 (sin.f64 0) (sin.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 2)))) 2))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 -1/2 y-scale) (/.f64 (.f64 x-scale (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (.f64 -1/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (.f64 -1/2 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (*.f64 y-scale x-scale))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (fabs.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (fabs.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (-.f64 (.f64 b b) (.f64 a a))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 -1 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (/.f64 (/.f64 (.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))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (log.f64 (exp.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (.f64 a a))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (.f64 -1/2 (expm1.f64 (log1p.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b (.f64 b (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 x-scale (.f64 (.f64 x-scale (+.f64 b a)) (-.f64 b a))))))))) (.f64 y-scale x-scale))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (/.f64 (.f64 y-scale (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))) (.f64 x-scale (.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 2 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 (.f64 (.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (-.f64 (.f64 b b) (*.f64 a a))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 -1/2 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 1/2 (.f64 (.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (.f64 -1/2 (.f64 (/.f64 x-scale (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 1/2 x-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) (/.f64 180 (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))))))))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (.f64 a a) y-scale)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 y-scale (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale))))))))) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 b 4)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 x-scale (/.f64 (.f64 b b) x-scale))) (/.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 b b) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 (.f64 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2)))) 2) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2) (fma.f64 2 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) 2)))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 1/2 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (/.f64 (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)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (/.f64 (-.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 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 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 (.f64 (/.f64 (-.f64 b a) (/.f64 y-scale (+.f64 a b))) 2) (/.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) x-scale))))) (.f64 1 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 (-.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 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) b) 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 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) b) 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 2 (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))))) (.f64 y-scale x-scale))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) (sin.f64 (/.f64 angle (/.f64 180 (PI.f64)))))))) (.f64 y-scale x-scale))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (/.f64 (-.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 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 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 (.f64 (/.f64 (-.f64 b a) (/.f64 y-scale (+.f64 a b))) 2) (/.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) x-scale))))) (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))))))) (/.f64 180 (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (/.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 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 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 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) x-scale) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale))))) (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))))))))
(.f64 180 (/.f64 (atan.f64 (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.f64 (.f64 (.f64 2 (-.f64 (pow.f64 b 2) (pow.f64 a 2))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 1) x-scale) y-scale))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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))) (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.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 (.f64 b b) (.f64 a a)) (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))))))))

Outputs
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (pow.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 3))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (tan.f64 (pow.f64 (cbrt.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 3))))) (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (pow.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 3)))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 angle (log.f64 (exp.f64 1/180)))))))) (PI.f64)))

Calls

11 calls:

1.9s	(*.f64 (/.f64 angle 180) (PI.f64))
1.4s	(/.f64 angle 180)
1.3s	angle
1.3s	y-scale
1.2s	b

Results

Accuracy	Segments	Branch
70.8%	6	`a`
68.9%	9	`b`
66.0%	9	`angle`
65.8%	9	`x-scale`
66.1%	11	`y-scale`
55.8%	2	(.f64 180 (/.f64 (atan.f64 (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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))) (PI.f64)))
55.8%	2	(/.f64 (atan.f64 (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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))) (PI.f64))
55.8%	2	(atan.f64 (/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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)))
55.8%	2	(/.f64 (-.f64 (-.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)) 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)) 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)) 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 (.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))
66.0%	9	`(*.f64 (/.f64 angle 180) (PI.f64))`
66.0%	9	`(/.f64 angle 180)`

Compiler

Compiled 9565 to 5789 computations (39.5% saved)

bsearch3.9s (2.6%)

Algorithm

5×	binary-search

Stop Event

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

Steps

Time	Left	Right
562.0ms	2.755830948361134e+51	8.966530297649685e+52
876.0ms	2.216700357238132e-5	121307.0901451924
805.0ms	1.0070838010106195e-100	3.9359126729148287e-97
726.0ms	-6.990723248823832e-100	-1.9817663448217534e-103
953.0ms	-1.3810375238378766e+71	-3.776047224362168e+58

Results

2.1s	179×	body	4096	valid
747.0ms	102×	body	2048	valid
562.0ms	109×	body	1024	valid
297.0ms	237×	body	256	valid
163.0ms	61×	body	512	valid

Compiler

Compiled 2647 to 2138 computations (19.2% saved)

regimes4.5s (3%)

Counts

145 → 6

Calls

Call 1

Inputs
(.f64 180 (/.f64 (atan.f64 (.f64 1/180 (/.f64 y-scale (/.f64 x-scale (*.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 1/180 (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 (*.f64 y-scale 1/180) (/.f64 x-scale angle)) (PI.f64))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (.f64 180 (/.f64 (/.f64 x-scale angle) (PI.f64))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 -180 x-scale) (.f64 y-scale (.f64 angle (PI.f64))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 (.f64 1/180 (.f64 y-scale angle)) (PI.f64)) x-scale)) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) y-scale) x-scale)) (PI.f64)))
(*.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 (/.f64 180 angle) (PI.f64)))) (PI.f64)))
(.f64 (atan.f64 (.f64 -180 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64)))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (/.f64 (.f64 -180 y-scale) (.f64 (.f64 x-scale angle) (PI.f64)))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (/.f64 (.f64 y-scale -180) (.f64 angle (.f64 (PI.f64) x-scale)))) (/.f64 180 (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(/.f64 180 (/.f64 (PI.f64) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180))))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 180 (.f64 (.f64 x-scale angle) (PI.f64)))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (neg.f64 (.f64 (/.f64 (.f64 y-scale 1/180) (neg.f64 x-scale)) (.f64 angle (PI.f64))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 1/180 (/.f64 y-scale (*.f64 (/.f64 1 angle) (/.f64 x-scale (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 -2 (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (.f64 x-scale (.f64 (*.f64 angle (PI.f64)) -1/2))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (neg.f64 x-scale) (*.f64 (PI.f64) (neg.f64 angle))))) (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (*.f64 (/.f64 (/.f64 180 angle) (PI.f64)) (/.f64 y-scale x-scale)))) (/.f64 180 (PI.f64)))
(.f64 (/.f64 1 (PI.f64)) (.f64 180 (atan.f64 (*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64))))))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (.f64 (/.f64 (/.f64 1 y-scale) (*.f64 angle (PI.f64))) x-scale)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 x-scale (*.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 y-scale (/.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 b b))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 -180 (/.f64 (.f64 (.f64 (.f64 angle x-scale) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 b (.f64 b y-scale))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (.f64 -180 (/.f64 (.f64 b b) (.f64 (.f64 x-scale angle) (.f64 (-.f64 (.f64 b b) (*.f64 a a)) (PI.f64))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (.f64 -180 (/.f64 (/.f64 (.f64 b b) (.f64 x-scale angle)) (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (.f64 360 (.f64 (/.f64 b angle) (/.f64 b (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (+.f64 a b))) (-.f64 b a)) y-scale))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64))) x-scale)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (/.f64 (.f64 a a) angle) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b)))))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (/.f64 1/360 (/.f64 (.f64 b b) (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (.f64 (*.f64 x-scale x-scale) angle))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 y-scale (.f64 (/.f64 2 (PI.f64)) (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (*.f64 a a))) (/.f64 x-scale angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale 2)) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle)) y-scale))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))) x-scale)))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (.f64 90 (.f64 (/.f64 x-scale angle) (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (/.f64 180 (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (.f64 90 (/.f64 2 (/.f64 (.f64 (.f64 angle (-.f64 (.f64 b b) (.f64 a a))) (PI.f64)) (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 b (/.f64 (.f64 x-scale x-scale) b)))))))))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (neg.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (/.f64 (/.f64 y-scale angle) (.f64 (PI.f64) (neg.f64 (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (.f64 (/.f64 (.f64 angle (PI.f64)) 1) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 1/180 (fabs.f64 (.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 1/180 (/.f64 y-scale (fabs.f64 (/.f64 (/.f64 x-scale angle) (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale)) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 1 (/.f64 x-scale (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 1 x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 1 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale y-scale)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 1 x-scale)))) (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale 1) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (*.f64 angle (PI.f64))) x-scale))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 -1 (.f64 (/.f64 x-scale y-scale) (neg.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (fabs.f64 (.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (fabs.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (fabs.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (fabs.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 1 (fabs.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (log.f64 (exp.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (exp.f64 (log.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (log.f64 (exp.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (/.f64 angle x-scale)) (/.f64 (cbrt.f64 y-scale) (.f64 1/2 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (exp.f64 (log.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (exp.f64 (log.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (log1p.f64 (expm1.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (tan.f64 (expm1.f64 (log1p.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 angle (log.f64 (exp.f64 1/180)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (sqrt.f64 (pow.f64 (/.f64 x-scale (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (tan.f64 (pow.f64 (cbrt.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 3))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 3))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale x-scale) (sqrt.f64 (pow.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) -2)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (tan.f64 (pow.f64 (pow.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 3) 1/3))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale x-scale) (log1p.f64 (expm1.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 1 (tan.f64 (expm1.f64 (log1p.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (pow.f64 (pow.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3) 1/3)) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3) 1))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (sqrt.f64 y-scale) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sqrt.f64 y-scale))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale (sqrt.f64 x-scale)) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 x-scale)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle)))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (/.f64 (.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (/.f64 (.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (neg.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))) (/.f64 y-scale x-scale)))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (/.f64 1 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) y-scale))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 1 x-scale))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (.f64 (/.f64 1 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (.f64 y-scale (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (.f64 -1/2 (/.f64 -2 (/.f64 (.f64 x-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (*.f64 y-scale x-scale))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (.f64 -1/2 (/.f64 (.f64 2 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale)))) (*.f64 y-scale x-scale))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (.f64 -1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 1/2 (.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) (/.f64 180 (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (/.f64 (.f64 2 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 b (/.f64 (.f64 x-scale x-scale) b)))) (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))))))))
(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (cbrt.f64 x-scale))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (cbrt.f64 y-scale)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 1/180 (.f64 (/.f64 y-scale (/.f64 x-scale (pow.f64 (cbrt.f64 (.f64 angle (PI.f64))) 2))) (cbrt.f64 (*.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (fabs.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (fabs.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fabs.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (fabs.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (exp.f64 (log.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (expm1.f64 (log1p.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (exp.f64 (log.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 angle (log.f64 (exp.f64 1/180)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle (log.f64 (exp.f64 1/180))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (pow.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (pow.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (pow.f64 (sqrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (exp.f64 (log.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (exp.f64 (log.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 3)) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (pow.f64 (pow.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 3) 1/3)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (exp.f64 (log.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (expm1.f64 (log1p.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 (/.f64 (sqrt.f64 y-scale) (.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (/.f64 x-scale (cos.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))) (sqrt.f64 y-scale))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) 1/180)) 3))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (pow.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 3)))))) (/.f64 180 (PI.f64)))

Outputs
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (pow.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 3)))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (pow.f64 (cbrt.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 3)))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 angle (log.f64 (exp.f64 1/180)))))))) (PI.f64)))

Calls

7 calls:

780.0ms	(/.f64 angle 180)
756.0ms	(*.f64 (/.f64 angle 180) (PI.f64))
723.0ms	y-scale
588.0ms	angle
545.0ms	b

Results

Accuracy	Segments	Branch
70.4%	6	`a`
66.6%	7	`b`
66.0%	9	`angle`
64.0%	7	`x-scale`
66.1%	11	`y-scale`
66.0%	9	`(*.f64 (/.f64 angle 180) (PI.f64))`
66.0%	9	`(/.f64 angle 180)`

Compiler

Compiled 3378 to 1950 computations (42.3% saved)

bsearch3.3s (2.2%)

Algorithm

5×	binary-search

Stop Event

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

Steps

Time	Left	Right
532.0ms	2.755830948361134e+51	8.966530297649685e+52
538.0ms	7389524635853314.0	123240923588098430.0
730.0ms	5.697889410694786e-95	9.599307459221982e-88
649.0ms	-6.990723248823832e-100	-1.9817663448217534e-103
834.0ms	-1.3810375238378766e+71	-3.776047224362168e+58

Results

1.7s	164×	body	4096	valid
617.0ms	99×	body	2048	valid
555.0ms	107×	body	1024	valid
237.0ms	231×	body	256	valid
159.0ms	55×	body	512	valid

Compiler

Compiled 2485 to 1996 computations (19.7% saved)

regimes4.2s (2.8%)

Counts

144 → 6

Calls

Call 1

Inputs
(.f64 180 (/.f64 (atan.f64 (.f64 1/180 (/.f64 y-scale (/.f64 x-scale (*.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 1/180 (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 (*.f64 y-scale 1/180) (/.f64 x-scale angle)) (PI.f64))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (.f64 180 (/.f64 (/.f64 x-scale angle) (PI.f64))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 -180 x-scale) (.f64 y-scale (.f64 angle (PI.f64))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 (.f64 1/180 (.f64 y-scale angle)) (PI.f64)) x-scale)) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) y-scale) x-scale)) (PI.f64)))
(*.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 (/.f64 180 angle) (PI.f64)))) (PI.f64)))
(.f64 (atan.f64 (.f64 -180 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64)))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (/.f64 (.f64 -180 y-scale) (.f64 (.f64 x-scale angle) (PI.f64)))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (/.f64 (.f64 y-scale -180) (.f64 angle (.f64 (PI.f64) x-scale)))) (/.f64 180 (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(/.f64 180 (/.f64 (PI.f64) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180))))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 180 (.f64 (.f64 x-scale angle) (PI.f64)))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (neg.f64 (.f64 (/.f64 (.f64 y-scale 1/180) (neg.f64 x-scale)) (.f64 angle (PI.f64))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 1/180 (/.f64 y-scale (*.f64 (/.f64 1 angle) (/.f64 x-scale (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 -2 (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (.f64 x-scale (.f64 (*.f64 angle (PI.f64)) -1/2))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (neg.f64 x-scale) (*.f64 (PI.f64) (neg.f64 angle))))) (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (*.f64 (/.f64 (/.f64 180 angle) (PI.f64)) (/.f64 y-scale x-scale)))) (/.f64 180 (PI.f64)))
(.f64 (/.f64 1 (PI.f64)) (.f64 180 (atan.f64 (*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64))))))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (.f64 (/.f64 (/.f64 1 y-scale) (*.f64 angle (PI.f64))) x-scale)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 x-scale (*.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 y-scale (/.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 b b))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 -180 (/.f64 (.f64 (.f64 (.f64 angle x-scale) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 b (.f64 b y-scale))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (.f64 -180 (/.f64 (.f64 b b) (.f64 (.f64 x-scale angle) (.f64 (-.f64 (.f64 b b) (*.f64 a a)) (PI.f64))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (.f64 -180 (/.f64 (/.f64 (.f64 b b) (.f64 x-scale angle)) (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (.f64 360 (.f64 (/.f64 b angle) (/.f64 b (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (+.f64 a b))) (-.f64 b a)) y-scale))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64))) x-scale)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (/.f64 (.f64 a a) angle) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b)))))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (/.f64 1/360 (/.f64 (.f64 b b) (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (.f64 (*.f64 x-scale x-scale) angle))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 y-scale (.f64 (/.f64 2 (PI.f64)) (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (*.f64 a a))) (/.f64 x-scale angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale 2)) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle)) y-scale))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))) x-scale)))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (.f64 90 (.f64 (/.f64 x-scale angle) (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (/.f64 180 (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (.f64 90 (/.f64 2 (/.f64 (.f64 (.f64 angle (-.f64 (.f64 b b) (.f64 a a))) (PI.f64)) (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 b (/.f64 (.f64 x-scale x-scale) b)))))))))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (neg.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (/.f64 (/.f64 y-scale angle) (.f64 (PI.f64) (neg.f64 (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (.f64 (/.f64 (.f64 angle (PI.f64)) 1) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 1/180 (fabs.f64 (.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 1/180 (/.f64 y-scale (fabs.f64 (/.f64 (/.f64 x-scale angle) (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale)) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 1 (/.f64 x-scale (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 1 x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 1 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale y-scale)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 1 x-scale)))) (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale 1) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (*.f64 angle (PI.f64))) x-scale))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 -1 (.f64 (/.f64 x-scale y-scale) (neg.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (fabs.f64 (.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (fabs.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (fabs.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (fabs.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 1 (fabs.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (log.f64 (exp.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (exp.f64 (log.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (log.f64 (exp.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (/.f64 angle x-scale)) (/.f64 (cbrt.f64 y-scale) (.f64 1/2 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (exp.f64 (log.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (exp.f64 (log.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (log1p.f64 (expm1.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (tan.f64 (expm1.f64 (log1p.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 angle (log.f64 (exp.f64 1/180)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (sqrt.f64 (pow.f64 (/.f64 x-scale (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (tan.f64 (pow.f64 (cbrt.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 3))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 3))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale x-scale) (sqrt.f64 (pow.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) -2)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (tan.f64 (pow.f64 (pow.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 3) 1/3))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale x-scale) (log1p.f64 (expm1.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 1 (tan.f64 (expm1.f64 (log1p.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (pow.f64 (pow.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3) 1/3)) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3) 1))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (sqrt.f64 y-scale) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sqrt.f64 y-scale))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale (sqrt.f64 x-scale)) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 x-scale)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle)))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (/.f64 (.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (/.f64 (.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (neg.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))) (/.f64 y-scale x-scale)))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (/.f64 1 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) y-scale))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 1 x-scale))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (.f64 (/.f64 1 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (.f64 y-scale (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (.f64 -1/2 (/.f64 -2 (/.f64 (.f64 x-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (*.f64 y-scale x-scale))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (.f64 -1/2 (/.f64 (.f64 2 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale)))) (*.f64 y-scale x-scale))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (.f64 -1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 1/2 (.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) (/.f64 180 (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (/.f64 (.f64 2 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 b (/.f64 (.f64 x-scale x-scale) b)))) (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))))))))
(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (cbrt.f64 x-scale))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (cbrt.f64 y-scale)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 1/180 (.f64 (/.f64 y-scale (/.f64 x-scale (pow.f64 (cbrt.f64 (.f64 angle (PI.f64))) 2))) (cbrt.f64 (*.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (fabs.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (fabs.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fabs.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (fabs.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (exp.f64 (log.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (expm1.f64 (log1p.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (exp.f64 (log.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 angle (log.f64 (exp.f64 1/180)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle (log.f64 (exp.f64 1/180))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (pow.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (pow.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (pow.f64 (sqrt.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (exp.f64 (log.f64 (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (exp.f64 (log.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (pow.f64 (cbrt.f64 (.f64 y-scale (/.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 3)) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (pow.f64 (pow.f64 (.f64 (PI.f64) (.f64 1/180 angle)) 3) 1/3)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (exp.f64 (log.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (expm1.f64 (log1p.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 (/.f64 (sqrt.f64 y-scale) (.f64 (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (/.f64 x-scale (cos.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))) (sqrt.f64 y-scale))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (cbrt.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) 1/180)) 3))))))) (/.f64 180 (PI.f64)))

Outputs
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale 1) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale 1) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 angle (log.f64 (exp.f64 1/180)))))))) (PI.f64)))

Calls

7 calls:

743.0ms	y-scale
637.0ms	(/.f64 angle 180)
584.0ms	(*.f64 (/.f64 angle 180) (PI.f64))
577.0ms	b
571.0ms	angle

Results

Accuracy	Segments	Branch
69.9%	6	`a`
66.3%	8	`b`
66.0%	9	`angle`
63.6%	7	`x-scale`
66.0%	11	`y-scale`
66.0%	9	`(*.f64 (/.f64 angle 180) (PI.f64))`
66.0%	9	`(/.f64 angle 180)`

Compiler

Compiled 3351 to 1931 computations (42.4% saved)

bsearch4.1s (2.7%)

Algorithm

5×	binary-search

Stop Event

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

Steps

Time	Left	Right
720.0ms	2.755830948361134e+51	8.966530297649685e+52
570.0ms	7389524635853314.0	123240923588098430.0
557.0ms	5.697889410694786e-95	9.599307459221982e-88
653.0ms	-6.990723248823832e-100	-1.9817663448217534e-103
1.6s	-1.3810375238378766e+71	-3.776047224362168e+58

Results

2.2s	173×	body	4096	valid
882.0ms	74×	body	2048	valid
537.0ms	104×	body	1024	valid
307.0ms	252×	body	256	valid
149.0ms	53×	body	512	valid

Compiler

Compiled 2237 to 1810 computations (19.1% saved)

regimes4.1s (2.8%)

Counts

130 → 6

Calls

Call 1

Inputs
(.f64 180 (/.f64 (atan.f64 (.f64 1/180 (/.f64 y-scale (/.f64 x-scale (*.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 1/180 (/.f64 (.f64 y-scale (.f64 angle (PI.f64))) x-scale))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 (*.f64 y-scale 1/180) (/.f64 x-scale angle)) (PI.f64))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (.f64 180 (/.f64 (/.f64 x-scale angle) (PI.f64))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 -180 x-scale) (.f64 y-scale (.f64 angle (PI.f64))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 (.f64 1/180 (.f64 y-scale angle)) (PI.f64)) x-scale)) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 (.f64 (PI.f64) (.f64 1/180 angle)) y-scale) x-scale)) (PI.f64)))
(*.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 (/.f64 180 angle) (PI.f64)))) (PI.f64)))
(.f64 (atan.f64 (.f64 -180 (/.f64 y-scale (.f64 x-scale (.f64 angle (PI.f64)))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (/.f64 (.f64 -180 y-scale) (.f64 (.f64 x-scale angle) (PI.f64)))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (/.f64 (.f64 y-scale -180) (.f64 angle (.f64 (PI.f64) x-scale)))) (/.f64 180 (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64)))))
(/.f64 180 (/.f64 (PI.f64) (atan.f64 (.f64 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64))) -180))))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 180 (.f64 (.f64 x-scale angle) (PI.f64)))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (neg.f64 (.f64 (/.f64 (.f64 y-scale 1/180) (neg.f64 x-scale)) (.f64 angle (PI.f64))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 1/180 (/.f64 y-scale (*.f64 (/.f64 1 angle) (/.f64 x-scale (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 x-scale (.f64 y-scale (*.f64 angle (PI.f64))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 (/.f64 x-scale y-scale) (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 -2 (/.f64 (.f64 angle (.f64 (PI.f64) x-scale)) y-scale)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (.f64 x-scale (.f64 (*.f64 angle (PI.f64)) -1/2))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 -180 y-scale) (/.f64 (neg.f64 x-scale) (*.f64 (PI.f64) (neg.f64 angle))))) (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (*.f64 (/.f64 (/.f64 180 angle) (PI.f64)) (/.f64 y-scale x-scale)))) (/.f64 180 (PI.f64)))
(.f64 (/.f64 1 (PI.f64)) (.f64 180 (atan.f64 (*.f64 (/.f64 -180 y-scale) (/.f64 (/.f64 x-scale angle) (PI.f64))))))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (.f64 (/.f64 (/.f64 1 y-scale) (*.f64 angle (PI.f64))) x-scale)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 x-scale (*.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -180 (/.f64 y-scale (/.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 b b))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 -180 (/.f64 (.f64 (.f64 (.f64 angle x-scale) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 b (.f64 b y-scale))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (.f64 -180 (/.f64 (.f64 b b) (.f64 (.f64 x-scale angle) (.f64 (-.f64 (.f64 b b) (*.f64 a a)) (PI.f64))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (.f64 -180 (/.f64 (/.f64 (.f64 b b) (.f64 x-scale angle)) (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (.f64 360 (.f64 (/.f64 b angle) (/.f64 b (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 (.f64 b b) (/.f64 (.f64 (.f64 (.f64 x-scale angle) (.f64 (PI.f64) (+.f64 a b))) (-.f64 b a)) y-scale))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 -2 (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 (+.f64 b a) (*.f64 (-.f64 b a) (PI.f64))) x-scale)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (.f64 a a) (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 2 (.f64 (/.f64 x-scale y-scale) (/.f64 (/.f64 (.f64 a a) angle) (.f64 (-.f64 b a) (*.f64 (PI.f64) (+.f64 a b)))))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (/.f64 1/360 (/.f64 (.f64 b b) (.f64 (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))) (.f64 (*.f64 x-scale x-scale) angle))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 2 (.f64 (.f64 x-scale (/.f64 (/.f64 y-scale angle) (.f64 (-.f64 b a) (.f64 (PI.f64) (+.f64 a b))))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b (/.f64 b (.f64 x-scale x-scale)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 y-scale (.f64 (/.f64 2 (PI.f64)) (.f64 (/.f64 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (.f64 x-scale x-scale)))) (-.f64 (.f64 b b) (*.f64 a a))) (/.f64 x-scale angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (.f64 (/.f64 y-scale (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale 2)) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle)) y-scale))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 (/.f64 y-scale (.f64 angle (.f64 (+.f64 b a) (.f64 (-.f64 b a) (PI.f64))))) (/.f64 (/.f64 1/2 (-.f64 (/.f64 (/.f64 a (/.f64 y-scale a)) y-scale) (.f64 b (/.f64 b (*.f64 x-scale x-scale))))) x-scale)))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (.f64 90 (.f64 (/.f64 x-scale angle) (/.f64 (.f64 2 (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (/.f64 180 (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (.f64 90 (/.f64 2 (/.f64 (.f64 (.f64 angle (-.f64 (.f64 b b) (.f64 a a))) (PI.f64)) (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 b (/.f64 (.f64 x-scale x-scale) b)))))))))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (neg.f64 (.f64 (.f64 2 x-scale) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (/.f64 (/.f64 y-scale angle) (.f64 (PI.f64) (neg.f64 (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (.f64 (/.f64 (.f64 angle (PI.f64)) 1) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 x-scale (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 1/180 (fabs.f64 (.f64 (PI.f64) (.f64 y-scale (/.f64 angle x-scale)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 1/180 (/.f64 y-scale (fabs.f64 (/.f64 (/.f64 x-scale angle) (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) x-scale)) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 1 (/.f64 x-scale (.f64 y-scale (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 1 x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 1 (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale y-scale)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 1 x-scale)))) (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale 1) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (*.f64 angle (PI.f64))) x-scale))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 -1 (.f64 (/.f64 x-scale y-scale) (neg.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (fabs.f64 (.f64 y-scale (/.f64 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (fabs.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (fabs.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (fabs.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 1 (fabs.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (log.f64 (exp.f64 (.f64 y-scale (.f64 (/.f64 (.f64 2 (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (/.f64 x-scale angle))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (exp.f64 (log.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (/.f64 y-scale (log.f64 (exp.f64 (.f64 (/.f64 angle (.f64 x-scale 2)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 90 (.f64 (/.f64 (cbrt.f64 (.f64 y-scale y-scale)) (/.f64 angle x-scale)) (/.f64 (cbrt.f64 y-scale) (.f64 1/2 (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (-.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (exp.f64 (log.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (exp.f64 (log.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (log1p.f64 (expm1.f64 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (tan.f64 (expm1.f64 (log1p.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 angle (log.f64 (exp.f64 1/180)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (sqrt.f64 (pow.f64 (/.f64 x-scale (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) 2)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (tan.f64 (pow.f64 (cbrt.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 3))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (pow.f64 (cbrt.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 3))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale x-scale) (sqrt.f64 (pow.f64 (tan.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) -2)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 x-scale (tan.f64 (pow.f64 (pow.f64 (.f64 (PI.f64) (*.f64 1/180 angle)) 3) 1/3))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale x-scale) (log1p.f64 (expm1.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale x-scale) (/.f64 1 (tan.f64 (expm1.f64 (log1p.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (pow.f64 (pow.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3) 1/3)) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3) 1))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (sqrt.f64 y-scale) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 x-scale (sqrt.f64 y-scale))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale (sqrt.f64 x-scale)) (.f64 (/.f64 1 (tan.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 x-scale)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (/.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 y-scale (/.f64 (.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle)))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (/.f64 (.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (/.f64 (.f64 y-scale (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (neg.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle)) (.f64 x-scale (sin.f64 (.f64 (*.f64 (PI.f64) 1/180) angle))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (.f64 (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))) (/.f64 y-scale x-scale)))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (/.f64 (/.f64 (neg.f64 (cos.f64 (.f64 (.f64 (PI.f64) 1/180) angle))) x-scale) (sin.f64 (.f64 (.f64 (PI.f64) 1/180) angle)))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (/.f64 1 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 x-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) y-scale))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (neg.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 1 x-scale))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (.f64 (/.f64 1 (.f64 x-scale (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) (.f64 y-scale (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (.f64 -1/2 (/.f64 -2 (/.f64 (.f64 x-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (*.f64 y-scale x-scale))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (.f64 -1/2 (/.f64 (.f64 2 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale)))) (*.f64 y-scale x-scale))) (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (.f64 -1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))) (/.f64 180 (PI.f64)))
(.f64 (atan.f64 (.f64 y-scale (/.f64 (.f64 -1/2 x-scale) (/.f64 (.f64 1/2 (.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) (/.f64 180 (PI.f64)))
(.f64 (/.f64 180 (PI.f64)) (atan.f64 (.f64 (.f64 y-scale x-scale) (/.f64 (.f64 2 (-.f64 (/.f64 a (/.f64 (.f64 y-scale y-scale) a)) (/.f64 b (/.f64 (.f64 x-scale x-scale) b)))) (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))))))))
(.f64 180 (/.f64 (atan.f64 (/.f64 (/.f64 y-scale (/.f64 (pow.f64 (cbrt.f64 x-scale) 2) (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) (cbrt.f64 x-scale))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (/.f64 (pow.f64 (cbrt.f64 y-scale) 2) (/.f64 (/.f64 x-scale (tan.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (cbrt.f64 y-scale)))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 1/180 (.f64 (/.f64 y-scale (/.f64 x-scale (pow.f64 (cbrt.f64 (.f64 angle (PI.f64))) 2))) (cbrt.f64 (*.f64 angle (PI.f64)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (fabs.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (fabs.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fabs.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (fabs.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 (cbrt.f64 (/.f64 y-scale x-scale)) (/.f64 1 (tan.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (pow.f64 (cbrt.f64 (/.f64 y-scale x-scale)) 2))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (exp.f64 (log.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (expm1.f64 (log1p.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (cos.f64 (exp.f64 (log.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))) (PI.f64)))

Outputs
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1))) (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale 1) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (tan.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (PI.f64)))
(.f64 (atan.f64 (.f64 -1 (/.f64 (.f64 y-scale 1) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 180 (PI.f64)))
(.f64 180 (/.f64 (atan.f64 (.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (fabs.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (PI.f64)))

Calls

7 calls:

918.0ms	y-scale
749.0ms	(/.f64 angle 180)
728.0ms	(*.f64 (/.f64 angle 180) (PI.f64))
549.0ms	angle
420.0ms	x-scale

Results

Accuracy	Segments	Branch
69.8%	6	`a`
64.2%	5	`b`
65.7%	9	`angle`
63.6%	7	`x-scale`
66.0%	11	`y-scale`
65.7%	9	`(*.f64 (/.f64 angle 180) (PI.f64))`
65.7%	9	`(/.f64 angle 180)`

Compiler

Compiled 2997 to 1690 computations (43.6% saved)

bsearch3.5s (2.3%)

Algorithm

5×	binary-search

Stop Event

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

Steps

Time	Left	Right
516.0ms	2.755830948361134e+51	8.966530297649685e+52
569.0ms	7389524635853314.0	123240923588098430.0
765.0ms	5.697889410694786e-95	9.599307459221982e-88
769.0ms	-6.990723248823832e-100	-1.9817663448217534e-103
835.0ms	-1.3810375238378766e+71	-3.776047224362168e+58

Results

1.8s	175×	body	4096	valid
629.0ms	104×	body	2048	valid
620.0ms	113×	body	1024	valid
236.0ms	215×	body	256	valid
124.0ms	49×	body	512	valid

Compiler

Compiled 2230 to 1803 computations (19.1% saved)

regimes1.4s (0.9%)

Calls

3 calls:

648.0ms	(*.f64 (/.f64 angle 180) (PI.f64))
551.0ms	(/.f64 angle 180)
109.0ms	y-scale

Results

Accuracy	Segments	Branch
65.7%	9	`(*.f64 (/.f64 angle 180) (PI.f64))`
65.7%	9	`(/.f64 angle 180)`

Results

Compiler

Compiled 2853 to 1594 computations (44.1% saved)